BBS in a Box 15

home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / Prog / T / TE32K Demo FAT.sit / TE32K ƒ / main.c next >
MacBinary | 1994-07-21 | 25.3 KB | [TEXT/KAHL]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	Compact Compressed (Unix) `(archive/compact)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`10%`	dexvert	Jesper Olsen Module `(music/jesperOlsen)`	magic	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Thu Jul 21 17:31:05 1994, modified Thu Jul 21 17:31:05 1994, creator Think C, type ASCII, 24850 bytes "main.c" magic text fragment for file(1) cmd, 1st line "#include <Desk.h>", 2nd line "#include <Errors.h>", 3rd line "#include <Fonts.h>", 4th line "#include <Memory.h>", 5th line "#include <Menus.h>", at 0x6192 744 bytes resource magic text fragment for file(1) cmd, 1st line "#include <Desk.h>", 2nd line "#include <Errors.h>", 3rd line "#include <Fonts.h>", 4th line "#include <Memory.h>", 5th line "#include <Menus.h>"	default (weak)
`99%`	file	data	default
`49%`	TrID	Macintosh plain text (MacBinary)	default
`33%`	TrID	TTComp archive compressed (bin-4K)	default (weak)
`16%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[KAHL]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 06 6d 61 69 6e 2e 63 | 00 00 00 00 00 00 00 00 |..main.c|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 01 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 61 12 00 | 00 02 e8 aa 54 99 99 aa |.....a..|....T...|
|00000060| 54 99 99 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |T.......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 c7 b7 00 00 |........|........|
|00000080| 23 69 6e 63 6c 75 64 65 | 20 3c 44 65 73 6b 2e 68 |#include| <Desk.h|
|00000090| 3e 0d 23 69 6e 63 6c 75 | 64 65 20 3c 45 72 72 6f |>.#inclu|de <Erro|
|000000a0| 72 73 2e 68 3e 0d 23 69 | 6e 63 6c 75 64 65 20 3c |rs.h>.#i|nclude <|
|000000b0| 46 6f 6e 74 73 2e 68 3e | 0d 23 69 6e 63 6c 75 64 |Fonts.h>|.#includ|
|000000c0| 65 20 3c 4d 65 6d 6f 72 | 79 2e 68 3e 0d 23 69 6e |e <Memor|y.h>.#in|
|000000d0| 63 6c 75 64 65 20 3c 4d | 65 6e 75 73 2e 68 3e 0d |clude <M|enus.h>.|
|000000e0| 23 69 6e 63 6c 75 64 65 | 20 3c 53 74 61 6e 64 61 |#include| <Standa|
|000000f0| 72 64 46 69 6c 65 2e 68 | 3e 0d 23 69 6e 63 6c 75 |rdFile.h|>.#inclu|
|00000100| 64 65 20 3c 53 74 72 69 | 6e 67 73 2e 68 3e 0d 23 |de <Stri|ngs.h>.#|
|00000110| 69 6e 63 6c 75 64 65 20 | 3c 54 6f 6f 6c 55 74 69 |include |<ToolUti|
|00000120| 6c 73 2e 68 3e 0d 0d 23 | 69 6e 63 6c 75 64 65 20 |ls.h>..#|include |
|00000130| 3c 73 74 64 69 6f 2e 68 | 3e 0d 23 69 6e 63 6c 75 |<stdio.h|>.#inclu|
|00000140| 64 65 20 3c 73 74 72 69 | 6e 67 2e 68 3e 0d 23 69 |de <stri|ng.h>.#i|
|00000150| 6e 63 6c 75 64 65 20 22 | 54 45 33 32 4b 2e 68 22 |nclude "|TE32K.h"|
|00000160| 0d 0d 0d 23 64 65 66 69 | 6e 65 20 45 51 53 54 52 |...#defi|ne EQSTR|
|00000170| 09 30 0d 0d 0d 23 64 65 | 66 69 6e 65 09 79 65 73 |.0...#de|fine.yes|
|00000180| 4e 6f 43 61 6e 63 65 6c | 44 4c 4f 47 09 31 33 32 |NoCancel|DLOG.132|
|00000190| 0d 23 64 65 66 69 6e 65 | 09 65 72 72 6f 72 44 4c |.#define|.errorDL|
|000001a0| 4f 47 09 09 32 35 36 0d | 0d 23 64 65 66 69 6e 65 |OG..256.|.#define|
|000001b0| 09 6e 75 6d 4d 65 6e 75 | 73 09 34 0d 0d 23 64 65 |.numMenu|s.4..#de|
|000001c0| 66 69 6e 65 09 61 70 70 | 6c 65 4d 65 6e 75 09 30 |fine.app|leMenu.0|
|000001d0| 0d 23 64 65 66 69 6e 65 | 09 66 69 6c 65 4d 65 6e |.#define|.fileMen|
|000001e0| 75 09 31 0d 23 64 65 66 | 69 6e 65 09 65 64 69 74 |u.1.#def|ine.edit|
|000001f0| 4d 65 6e 75 09 32 0d 23 | 64 65 66 69 6e 65 20 66 |Menu.2.#|define f|
|00000200| 6f 6e 74 4d 65 6e 75 09 | 33 0d 0d 23 64 65 66 69 |ontMenu.|3..#defi|
|00000210| 6e 65 09 61 70 70 6c 65 | 49 44 09 09 31 32 38 0d |ne.apple|ID..128.|
|00000220| 23 64 65 66 69 6e 65 09 | 66 69 6c 65 49 44 09 09 |#define.|fileID..|
|00000230| 31 32 39 0d 23 64 65 66 | 69 6e 65 09 65 64 69 74 |129.#def|ine.edit|
|00000240| 49 44 09 09 31 33 30 0d | 23 64 65 66 69 6e 65 20 |ID..130.|#define |
|00000250| 66 6f 6e 74 49 44 09 09 | 31 33 31 0d 0d 23 64 65 |fontID..|131..#de|
|00000260| 66 69 6e 65 09 6e 65 77 | 43 6f 6d 6d 61 6e 64 09 |fine.new|Command.|
|00000270| 09 31 0d 23 64 65 66 69 | 6e 65 09 6f 70 65 6e 43 |.1.#defi|ne.openC|
|00000280| 6f 6d 6d 61 6e 64 09 09 | 32 0d 23 64 65 66 69 6e |ommand..|2.#defin|
|00000290| 65 20 69 6e 73 65 72 74 | 43 6f 6d 6d 61 6e 64 09 |e insert|Command.|
|000002a0| 33 0d 23 64 65 66 69 6e | 65 09 63 6c 6f 73 65 43 |3.#defin|e.closeC|
|000002b0| 6f 6d 6d 61 6e 64 09 34 | 0d 23 64 65 66 69 6e 65 |ommand.4|.#define|
|000002c0| 09 73 61 76 65 43 6f 6d | 6d 61 6e 64 09 09 35 0d |.saveCom|mand..5.|
|000002d0| 23 64 65 66 69 6e 65 09 | 73 61 76 65 41 73 43 6f |#define.|saveAsCo|
|000002e0| 6d 6d 61 6e 64 09 36 0d | 23 64 65 66 69 6e 65 20 |mmand.6.|#define |
|000002f0| 6d 61 6b 65 42 69 67 43 | 6f 6d 6d 61 6e 64 09 38 |makeBigC|ommand.8|
|00000300| 0d 23 64 65 66 69 6e 65 | 09 71 75 69 74 43 6f 6d |.#define|.quitCom|
|00000310| 6d 61 6e 64 09 09 31 30 | 0d 0d 23 64 65 66 69 6e |mand..10|..#defin|
|00000320| 65 09 75 6e 64 6f 43 6f | 6d 6d 61 6e 64 09 09 31 |e.undoCo|mmand..1|
|00000330| 0d 23 64 65 66 69 6e 65 | 09 63 75 74 43 6f 6d 6d |.#define|.cutComm|
|00000340| 61 6e 64 09 09 33 0d 23 | 64 65 66 69 6e 65 09 63 |and..3.#|define.c|
|00000350| 6f 70 79 43 6f 6d 6d 61 | 6e 64 09 09 34 0d 23 64 |opyComma|nd..4.#d|
|00000360| 65 66 69 6e 65 20 70 61 | 73 74 65 43 6f 6d 6d 61 |efine pa|steComma|
|00000370| 6e 64 09 35 0d 23 64 65 | 66 69 6e 65 09 63 6c 65 |nd.5.#de|fine.cle|
|00000380| 61 72 43 6f 6d 6d 61 6e | 64 09 36 0d 23 64 65 66 |arComman|d.6.#def|
|00000390| 69 6e 65 09 73 65 6c 65 | 63 74 43 6f 6d 6d 61 6e |ine.sele|ctComman|
|000003a0| 64 09 37 0d 23 64 65 66 | 69 6e 65 09 77 72 61 70 |d.7.#def|ine.wrap|
|000003b0| 43 6f 6d 6d 61 6e 64 09 | 09 39 0d 0d 0d 0d 63 68 |Command.|.9....ch|
|000003c0| 61 72 09 09 09 61 6c 69 | 76 65 3b 0d 4d 65 6e 75 |ar...ali|ve;.Menu|
|000003d0| 48 61 6e 64 6c 65 09 09 | 6d 79 4d 65 6e 75 73 5b |Handle..|myMenus[|
|000003e0| 6e 75 6d 4d 65 6e 75 73 | 5d 3b 0d 63 68 61 72 09 |numMenus|];.char.|
|000003f0| 09 09 74 65 6d 70 53 74 | 72 69 6e 67 5b 32 35 36 |..tempSt|ring[256|
|00000400| 5d 3b 0d 57 69 6e 64 6f | 77 50 74 72 09 09 74 68 |];.Windo|wPtr..th|
|00000410| 65 57 50 74 72 20 3d 20 | 30 4c 3b 0d 54 45 33 32 |eWPtr = |0L;.TE32|
|00000420| 4b 48 61 6e 64 6c 65 09 | 09 74 68 65 54 45 48 33 |KHandle.|.theTEH3|
|00000430| 32 4b 20 3d 20 30 4c 3b | 0d 43 6f 6e 74 72 6f 6c |2K = 0L;|.Control|
|00000440| 48 61 6e 64 6c 65 09 74 | 68 65 56 53 63 72 6f 6c |Handle.t|heVScrol|
|00000450| 6c 20 3d 20 30 4c 2c 20 | 74 68 65 48 53 63 72 6f |l = 0L, |theHScro|
|00000460| 6c 6c 20 3d 20 30 4c 3b | 0d 43 75 72 73 6f 72 09 |ll = 0L;|.Cursor.|
|00000470| 09 09 65 64 69 74 43 75 | 72 73 6f 72 2c 77 61 69 |..editCu|rsor,wai|
|00000480| 74 43 75 72 73 6f 72 3b | 0d 53 46 52 65 70 6c 79 |tCursor;|.SFReply|
|00000490| 09 09 09 6d 79 53 46 52 | 65 70 6c 79 3b 0d 63 68 |...mySFR|eply;.ch|
|000004a0| 61 72 09 09 09 63 68 61 | 6e 67 65 64 3b 0d 73 68 |ar...cha|nged;.sh|
|000004b0| 6f 72 74 09 09 09 09 64 | 65 66 61 75 6c 74 46 6f |ort....d|efaultFo|
|000004c0| 6e 74 2c 64 65 66 61 75 | 6c 74 46 6f 6e 74 53 69 |nt,defau|ltFontSi|
|000004d0| 7a 65 3b 0d 63 68 61 72 | 09 09 09 2a 74 68 65 54 |ze;.char|...*theT|
|000004e0| 65 73 74 53 74 72 69 6e | 67 20 3d 20 22 54 68 69 |estStrin|g = "Thi|
|000004f0| 73 20 69 73 20 74 65 72 | 6d 69 6e 61 74 65 64 20 |s is ter|minated |
|00000500| 62 79 20 61 20 5c 5c 6e | 20 63 68 61 72 61 63 74 |by a \\n| charact|
|00000510| 65 72 5c 6e 22 3b 0d 55 | 73 65 72 49 74 65 6d 55 |er\n";.U|serItemU|
|00000520| 50 50 09 09 64 65 66 61 | 75 6c 74 49 74 65 6d 55 |PP..defa|ultItemU|
|00000530| 50 50 20 3b 0d 0d 23 69 | 66 20 64 65 66 69 6e 65 |PP ;..#i|f define|
|00000540| 64 28 70 6f 77 65 72 63 | 29 20 7c 7c 20 64 65 66 |d(powerc|) || def|
|00000550| 69 6e 65 64 28 5f 5f 70 | 6f 77 65 72 63 29 0d 51 |ined(__p|owerc).Q|
|00000560| 44 47 6c 6f 62 61 6c 73 | 09 09 09 71 64 3b 0d 23 |DGlobals|...qd;.#|
|00000570| 65 6e 64 69 66 0d 0d 52 | 65 73 74 61 72 74 50 72 |endif..R|estartPr|
|00000580| 6f 63 28 29 0d 7b 0d 09 | 45 78 69 74 54 6f 53 68 |oc().{..|ExitToSh|
|00000590| 65 6c 6c 28 29 3b 0d 7d | 0d 0d 0d 0d 6d 61 69 6e |ell();.}|....main|
|000005a0| 28 29 0d 7b 0d 45 76 65 | 6e 74 52 65 63 6f 72 64 |().{.Eve|ntRecord|
|000005b0| 09 09 74 68 65 45 76 65 | 6e 74 3b 0d 75 6e 73 69 |..theEve|nt;.unsi|
|000005c0| 67 6e 65 64 20 63 68 61 | 72 09 74 68 65 43 68 61 |gned cha|r.theCha|
|000005d0| 72 3b 0d 0d 09 49 6e 69 | 74 47 72 61 66 28 26 71 |r;...Ini|tGraf(&q|
|000005e0| 64 2e 74 68 65 50 6f 72 | 74 29 3b 0d 09 49 6e 69 |d.thePor|t);..Ini|
|000005f0| 74 46 6f 6e 74 73 28 29 | 3b 0d 09 46 6c 75 73 68 |tFonts()|;..Flush|
|00000600| 45 76 65 6e 74 73 28 65 | 76 65 72 79 45 76 65 6e |Events(e|veryEven|
|00000610| 74 2c 30 29 3b 0d 09 49 | 6e 69 74 57 69 6e 64 6f |t,0);..I|nitWindo|
|00000620| 77 73 28 29 3b 0d 09 49 | 6e 69 74 4d 65 6e 75 73 |ws();..I|nitMenus|
|00000630| 28 29 3b 0d 09 54 45 49 | 6e 69 74 28 29 3b 0d 09 |();..TEI|nit();..|
|00000640| 49 6e 69 74 44 69 61 6c | 6f 67 73 28 30 29 3b 0d |InitDial|ogs(0);.|
|00000650| 09 49 6e 69 74 43 75 72 | 73 6f 72 28 29 3b 0d 09 |.InitCur|sor();..|
|00000660| 0d 09 54 45 33 32 4b 49 | 6e 69 74 28 29 3b 0d 09 |..TE32KI|nit();..|
|00000670| 0d 09 53 65 74 55 70 43 | 75 72 73 6f 72 73 28 29 |..SetUpC|ursors()|
|00000680| 3b 0d 09 0d 09 53 65 74 | 55 70 4d 65 6e 75 73 28 |;....Set|UpMenus(|
|00000690| 29 3b 0d 09 0d 09 64 65 | 66 61 75 6c 74 46 6f 6e |);....de|faultFon|
|000006a0| 74 20 3d 20 6d 6f 6e 61 | 63 6f 3b 0d 09 64 65 66 |t = mona|co;..def|
|000006b0| 61 75 6c 74 46 6f 6e 74 | 53 69 7a 65 20 3d 20 39 |aultFont|Size = 9|
|000006c0| 3b 0d 09 4d 61 73 68 6f | 72 74 61 69 6e 46 6f 6e |;..Masho|rtainFon|
|000006d0| 74 4d 65 6e 75 28 29 3b | 0d 09 0d 09 46 6c 75 73 |tMenu();|....Flus|
|000006e0| 68 45 76 65 6e 74 73 28 | 65 76 65 72 79 45 76 65 |hEvents(|everyEve|
|000006f0| 6e 74 2c 30 29 3b 0d 09 | 0d 09 61 6c 69 76 65 20 |nt,0);..|..alive |
|00000700| 3d 20 74 72 75 65 3b 0d | 09 0d 09 77 68 69 6c 65 |= true;.|...while|
|00000710| 20 28 61 6c 69 76 65 29 | 0d 09 7b 0d 09 09 53 79 | (alive)|..{...Sy|
|00000720| 73 74 65 6d 54 61 73 6b | 28 29 3b 0d 09 09 4d 61 |stemTask|();...Ma|
|00000730| 73 68 6f 72 74 61 69 6e | 43 75 72 73 6f 72 28 29 |shortain|Cursor()|
|00000740| 3b 0d 09 09 4d 61 73 68 | 6f 72 74 61 69 6e 4d 65 |;...Mash|ortainMe|
|00000750| 6e 75 73 28 29 3b 0d 09 | 09 44 6f 49 64 6c 65 28 |nus();..|.DoIdle(|
|00000760| 29 3b 0d 09 09 0d 09 09 | 69 66 20 28 47 65 74 4e |);......|if (GetN|
|00000770| 65 78 74 45 76 65 6e 74 | 28 65 76 65 72 79 45 76 |extEvent|(everyEv|
|00000780| 65 6e 74 2c 26 74 68 65 | 45 76 65 6e 74 29 29 0d |ent,&the|Event)).|
|00000790| 09 09 7b 0d 09 09 09 73 | 77 69 74 63 68 20 28 74 |..{....s|witch (t|
|000007a0| 68 65 45 76 65 6e 74 2e | 77 68 61 74 29 0d 09 09 |heEvent.|what)...|
|000007b0| 09 7b 0d 09 09 09 09 63 | 61 73 65 20 6d 6f 75 73 |.{.....c|ase mous|
|000007c0| 65 44 6f 77 6e 3a 0d 09 | 09 09 09 09 44 6f 4d 6f |eDown:..|....DoMo|
|000007d0| 75 73 65 44 6f 77 6e 28 | 26 74 68 65 45 76 65 6e |useDown(|&theEven|
|000007e0| 74 29 3b 0d 09 09 09 09 | 09 62 72 65 61 6b 3b 0d |t);.....|.break;.|
|000007f0| 09 09 09 09 0d 09 09 09 | 09 63 61 73 65 20 6b 65 |........|.case ke|
|00000800| 79 44 6f 77 6e 3a 0d 09 | 09 09 09 63 61 73 65 20 |yDown:..|...case |
|00000810| 61 75 74 6f 4b 65 79 3a | 20 0d 09 09 09 09 09 0d |autoKey:| .......|
|00000820| 09 09 09 09 09 74 68 65 | 43 68 61 72 20 3d 20 74 |.....the|Char = t|
|00000830| 68 65 45 76 65 6e 74 2e | 6d 65 73 73 61 67 65 20 |heEvent.|message |
|00000840| 26 20 63 68 61 72 43 6f | 64 65 4d 61 73 6b 3b 0d |& charCo|deMask;.|
|00000850| 09 09 09 09 09 0d 09 09 | 09 09 09 69 66 20 28 74 |........|...if (t|
|00000860| 68 65 45 76 65 6e 74 2e | 6d 6f 64 69 66 69 65 72 |heEvent.|modifier|
|00000870| 73 20 26 20 63 6d 64 4b | 65 79 29 0d 09 09 09 09 |s & cmdK|ey).....|
|00000880| 09 09 44 6f 43 6f 6d 6d | 61 6e 64 28 4d 65 6e 75 |..DoComm|and(Menu|
|00000890| 4b 65 79 28 28 75 6e 73 | 69 67 6e 65 64 20 63 68 |Key((uns|igned ch|
|000008a0| 61 72 29 20 74 68 65 43 | 68 61 72 29 29 3b 0d 09 |ar) theC|har));..|
|000008b0| 09 09 09 09 0d 09 09 09 | 09 09 65 6c 73 65 0d 09 |........|..else..|
|000008c0| 09 09 09 09 09 44 6f 4b | 65 79 28 28 75 6e 73 69 |.....DoK|ey((unsi|
|000008d0| 67 6e 65 64 20 63 68 61 | 72 29 20 74 68 65 43 68 |gned cha|r) theCh|
|000008e0| 61 72 29 3b 0d 09 09 09 | 09 09 0d 09 09 09 09 09 |ar);....|........|
|000008f0| 62 72 65 61 6b 3b 0d 09 | 09 09 09 09 0d 09 09 09 |break;..|........|
|00000900| 09 63 61 73 65 20 61 63 | 74 69 76 61 74 65 45 76 |.case ac|tivateEv|
|00000910| 74 3a 0d 09 09 09 09 09 | 69 66 20 28 49 73 4f 75 |t:......|if (IsOu|
|00000920| 72 57 69 6e 64 6f 77 28 | 28 57 69 6e 64 6f 77 50 |rWindow(|(WindowP|
|00000930| 74 72 29 20 74 68 65 45 | 76 65 6e 74 2e 6d 65 73 |tr) theE|vent.mes|
|00000940| 73 61 67 65 29 29 20 0d | 09 09 09 09 09 09 44 6f |sage)) .|......Do|
|00000950| 41 63 74 69 76 61 74 65 | 44 65 61 63 74 69 76 61 |Activate|Deactiva|
|00000960| 74 65 28 28 57 69 6e 64 | 6f 77 50 74 72 29 20 74 |te((Wind|owPtr) t|
|00000970| 68 65 45 76 65 6e 74 2e | 6d 65 73 73 61 67 65 2c |heEvent.|message,|
|00000980| 28 63 68 61 72 29 20 28 | 74 68 65 45 76 65 6e 74 |(char) (|theEvent|
|00000990| 2e 6d 6f 64 69 66 69 65 | 72 73 20 26 20 61 63 74 |.modifie|rs & act|
|000009a0| 69 76 65 46 6c 61 67 29 | 29 3b 0d 09 09 09 09 09 |iveFlag)|);......|
|000009b0| 0d 09 09 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 09 |......br|eak;....|
|000009c0| 09 09 0d 09 09 09 09 63 | 61 73 65 20 75 70 64 61 |.......c|ase upda|
|000009d0| 74 65 45 76 74 3a 20 0d | 09 09 09 09 09 69 66 20 |teEvt: .|.....if |
|000009e0| 28 49 73 4f 75 72 57 69 | 6e 64 6f 77 28 28 57 69 |(IsOurWi|ndow((Wi|
|000009f0| 6e 64 6f 77 50 74 72 29 | 20 74 68 65 45 76 65 6e |ndowPtr)| theEven|
|00000a00| 74 2e 6d 65 73 73 61 67 | 65 29 29 20 0d 09 09 09 |t.messag|e)) ....|
|00000a10| 09 09 09 55 70 64 61 74 | 65 57 69 6e 64 6f 77 28 |...Updat|eWindow(|
|00000a20| 28 57 69 6e 64 6f 77 50 | 74 72 29 20 74 68 65 45 |(WindowP|tr) theE|
|00000a30| 76 65 6e 74 2e 6d 65 73 | 73 61 67 65 29 3b 0d 09 |vent.mes|sage);..|
|00000a40| 09 09 09 09 0d 09 09 09 | 09 09 62 72 65 61 6b 3b |........|..break;|
|00000a50| 0d 09 09 09 7d 0d 09 09 | 7d 0d 09 7d 0d 7d 0d 0d |....}...|}..}.}..|
|00000a60| 0d 0d 0d 0d 70 61 73 63 | 61 6c 20 76 6f 69 64 20 |....pasc|al void |
|00000a70| 48 69 6c 69 74 65 44 65 | 66 61 75 6c 74 42 75 74 |HiliteDe|faultBut|
|00000a80| 74 6f 6e 28 74 68 65 44 | 50 74 72 2c 20 77 68 69 |ton(theD|Ptr, whi|
|00000a90| 63 68 49 74 65 6d 29 0d | 44 69 61 6c 6f 67 50 74 |chItem).|DialogPt|
|00000aa0| 72 20 74 68 65 44 50 74 | 72 3b 20 73 68 6f 72 74 |r theDPt|r; short|
|00000ab0| 20 77 68 69 63 68 49 74 | 65 6d 3b 0d 7b 0d 73 68 | whichIt|em;.{.sh|
|00000ac0| 6f 72 74 09 09 09 74 79 | 70 65 3b 0d 48 61 6e 64 |ort...ty|pe;.Hand|
|00000ad0| 6c 65 09 09 74 68 65 49 | 74 65 6d 3b 0d 52 65 63 |le..theI|tem;.Rec|
|00000ae0| 74 09 09 74 68 65 52 65 | 63 74 3b 0d 0d 09 47 65 |t..theRe|ct;...Ge|
|00000af0| 74 44 49 74 65 6d 28 74 | 68 65 44 50 74 72 2c 20 |tDItem(t|heDPtr, |
|00000b00| 28 28 44 69 61 6c 6f 67 | 50 65 65 6b 29 20 74 68 |((Dialog|Peek) th|
|00000b10| 65 44 50 74 72 29 2d 3e | 61 44 65 66 49 74 65 6d |eDPtr)->|aDefItem|
|00000b20| 2c 20 26 74 79 70 65 2c | 20 26 74 68 65 49 74 65 |, &type,| &theIte|
|00000b30| 6d 2c 20 26 74 68 65 52 | 65 63 74 29 3b 0d 09 50 |m, &theR|ect);..P|
|00000b40| 65 6e 4e 6f 72 6d 61 6c | 28 29 3b 0d 09 50 65 6e |enNormal|();..Pen|
|00000b50| 53 69 7a 65 28 33 2c 33 | 29 3b 0d 09 49 6e 73 65 |Size(3,3|);..Inse|
|00000b60| 74 52 65 63 74 28 26 74 | 68 65 52 65 63 74 2c 2d |tRect(&t|heRect,-|
|00000b70| 34 2c 2d 34 29 3b 0d 09 | 46 72 61 6d 65 52 6f 75 |4,-4);..|FrameRou|
|00000b80| 6e 64 52 65 63 74 28 26 | 74 68 65 52 65 63 74 2c |ndRect(&|theRect,|
|00000b90| 31 36 2c 31 36 29 3b 0d | 09 50 65 6e 53 69 7a 65 |16,16);.|.PenSize|
|00000ba0| 28 31 2c 31 29 3b 0d 7d | 0d 0d 0d 0d 45 72 72 6f |(1,1);.}|....Erro|
|00000bb0| 72 41 6c 65 72 74 28 70 | 30 29 0d 63 68 61 72 09 |rAlert(p|0).char.|
|00000bc0| 2a 70 30 3b 0d 7b 0d 47 | 72 61 66 50 74 72 09 09 |*p0;.{.G|rafPtr..|
|00000bd0| 09 6f 6c 64 50 6f 72 74 | 3b 0d 44 69 61 6c 6f 67 |.oldPort|;.Dialog|
|00000be0| 50 74 72 09 09 74 68 65 | 44 50 74 72 2c 74 65 6d |Ptr..the|DPtr,tem|
|00000bf0| 70 44 50 74 72 3b 0d 73 | 68 6f 72 74 09 09 09 09 |pDPtr;.s|hort....|
|00000c00| 69 74 65 6d 48 69 74 2c | 20 74 79 70 65 3b 0d 48 |itemHit,| type;.H|
|00000c10| 61 6e 64 6c 65 09 09 09 | 74 68 65 49 74 65 6d 3b |andle...|theItem;|
|00000c20| 0d 52 65 63 74 09 09 09 | 74 68 65 52 65 63 74 3b |.Rect...|theRect;|
|00000c30| 0d 45 76 65 6e 74 52 65 | 63 6f 72 64 09 09 74 68 |.EventRe|cord..th|
|00000c40| 65 45 76 65 6e 74 3b 0d | 0d 09 47 65 74 50 6f 72 |eEvent;.|..GetPor|
|00000c50| 74 28 26 6f 6c 64 50 6f | 72 74 29 3b 0d 09 0d 09 |t(&oldPo|rt);....|
|00000c60| 49 6e 69 74 43 75 72 73 | 6f 72 28 29 3b 0d 09 0d |InitCurs|or();...|
|00000c70| 09 69 66 20 28 21 28 74 | 68 65 44 50 74 72 20 3d |.if (!(t|heDPtr =|
|00000c80| 20 47 65 74 4e 65 77 44 | 69 61 6c 6f 67 28 65 72 | GetNewD|ialog(er|
|00000c90| 72 6f 72 44 4c 4f 47 2c | 20 4e 55 4c 4c 2c 28 57 |rorDLOG,| NULL,(W|
|00000ca0| 69 6e 64 6f 77 50 74 72 | 29 20 2d 31 4c 29 29 29 |indowPtr|) -1L)))|
|00000cb0| 0d 09 7b 0d 09 09 53 79 | 73 42 65 65 70 28 31 29 |..{...Sy|sBeep(1)|
|00000cc0| 3b 0d 09 09 45 78 69 74 | 54 6f 53 68 65 6c 6c 28 |;...Exit|ToShell(|
|00000cd0| 29 3b 0d 09 7d 0d 09 0d | 09 53 65 74 50 6f 72 74 |);..}...|.SetPort|
|00000ce0| 28 74 68 65 44 50 74 72 | 29 3b 0d 09 0d 09 43 65 |(theDPtr|);....Ce|
|00000cf0| 6e 74 65 72 57 69 6e 64 | 6f 77 28 74 68 65 44 50 |nterWind|ow(theDP|
|00000d00| 74 72 29 3b 0d 09 53 68 | 6f 77 57 69 6e 64 6f 77 |tr);..Sh|owWindow|
|00000d10| 28 74 68 65 44 50 74 72 | 29 3b 0d 09 0d 09 28 28 |(theDPtr|);....((|
|00000d20| 44 69 61 6c 6f 67 50 65 | 65 6b 29 20 74 68 65 44 |DialogPe|ek) theD|
|00000d30| 50 74 72 29 2d 3e 61 44 | 65 66 49 74 65 6d 20 3d |Ptr)->aD|efItem =|
|00000d40| 20 31 3b 0d 09 0d 09 69 | 66 20 28 21 64 65 66 61 | 1;....i|f (!defa|
|00000d50| 75 6c 74 49 74 65 6d 55 | 50 50 29 0d 09 09 64 65 |ultItemU|PP)...de|
|00000d60| 66 61 75 6c 74 49 74 65 | 6d 55 50 50 20 3d 20 4e |faultIte|mUPP = N|
|00000d70| 65 77 55 73 65 72 49 74 | 65 6d 50 72 6f 63 28 48 |ewUserIt|emProc(H|
|00000d80| 69 6c 69 74 65 44 65 66 | 61 75 6c 74 42 75 74 74 |iliteDef|aultButt|
|00000d90| 6f 6e 29 3b 0d 09 47 65 | 74 44 49 74 65 6d 28 74 |on);..Ge|tDItem(t|
|00000da0| 68 65 44 50 74 72 2c 20 | 33 2c 20 26 74 79 70 65 |heDPtr, |3, &type|
|00000db0| 2c 20 26 74 68 65 49 74 | 65 6d 2c 20 26 74 68 65 |, &theIt|em, &the|
|00000dc0| 52 65 63 74 29 3b 0d 09 | 53 65 74 44 49 74 65 6d |Rect);..|SetDItem|
|00000dd0| 28 74 68 65 44 50 74 72 | 2c 20 33 2c 20 74 79 70 |(theDPtr|, 3, typ|
|00000de0| 65 2c 20 28 48 61 6e 64 | 6c 65 29 20 64 65 66 61 |e, (Hand|le) defa|
|00000df0| 75 6c 74 49 74 65 6d 55 | 50 50 2c 20 26 74 68 65 |ultItemU|PP, &the|
|00000e00| 52 65 63 74 29 3b 0d 09 | 0d 09 47 65 74 44 49 74 |Rect);..|..GetDIt|
|00000e10| 65 6d 28 74 68 65 44 50 | 74 72 2c 20 32 2c 20 26 |em(theDP|tr, 2, &|
|00000e20| 74 79 70 65 2c 20 26 74 | 68 65 49 74 65 6d 2c 20 |type, &t|heItem, |
|00000e30| 26 74 68 65 52 65 63 74 | 29 3b 0d 09 43 32 50 53 |&theRect|);..C2PS|
|00000e40| 74 72 28 70 30 29 3b 0d | 09 53 65 74 49 54 65 78 |tr(p0);.|.SetITex|
|00000e50| 74 28 74 68 65 49 74 65 | 6d 2c 20 28 43 6f 6e 73 |t(theIte|m, (Cons|
|00000e60| 74 53 74 72 32 35 35 50 | 61 72 61 6d 29 20 70 30 |tStr255P|aram) p0|
|00000e70| 29 3b 0d 09 50 32 43 53 | 74 72 28 28 75 6e 73 69 |);..P2CS|tr((unsi|
|00000e80| 67 6e 65 64 20 63 68 61 | 72 20 2a 29 20 70 30 29 |gned cha|r *) p0)|
|00000e90| 3b 0d 09 0d 09 77 68 69 | 6c 65 20 28 21 47 65 74 |;....whi|le (!Get|
|00000ea0| 4e 65 78 74 45 76 65 6e | 74 28 75 70 64 61 74 65 |NextEven|t(update|
|00000eb0| 4d 61 73 6b 2c 26 74 68 | 65 45 76 65 6e 74 29 29 |Mask,&th|eEvent))|
|00000ec0| 3b 0d 09 0d 09 69 66 20 | 28 74 68 65 45 76 65 6e |;....if |(theEven|
|00000ed0| 74 2e 6d 65 73 73 61 67 | 65 20 3d 3d 20 28 6c 6f |t.messag|e == (lo|
|00000ee0| 6e 67 29 20 74 68 65 44 | 50 74 72 29 0d 09 09 44 |ng) theD|Ptr)...D|
|00000ef0| 69 61 6c 6f 67 53 65 6c | 65 63 74 28 26 74 68 65 |ialogSel|ect(&the|
|00000f00| 45 76 65 6e 74 2c 26 74 | 65 6d 70 44 50 74 72 2c |Event,&t|empDPtr,|
|00000f10| 26 69 74 65 6d 48 69 74 | 29 3b 0d 09 0d 09 53 79 |&itemHit|);....Sy|
|00000f20| 73 42 65 65 70 28 31 29 | 3b 0d 09 0d 09 64 6f 20 |sBeep(1)|;....do |
|00000f30| 0d 09 7b 0d 09 09 69 74 | 65 6d 48 69 74 20 3d 20 |..{...it|emHit = |
|00000f40| 30 3b 0d 09 09 0d 09 09 | 77 68 69 6c 65 20 28 21 |0;......|while (!|
|00000f50| 47 65 74 4e 65 78 74 45 | 76 65 6e 74 28 65 76 65 |GetNextE|vent(eve|
|00000f60| 72 79 45 76 65 6e 74 2c | 26 74 68 65 45 76 65 6e |ryEvent,|&theEven|
|00000f70| 74 29 29 3b 0d 09 09 0d | 09 09 69 66 20 28 74 68 |t));....|..if (th|
|00000f80| 65 45 76 65 6e 74 2e 77 | 68 61 74 3d 3d 6b 65 79 |eEvent.w|hat==key|
|00000f90| 44 6f 77 6e 20 7c 7c 20 | 74 68 65 45 76 65 6e 74 |Down || |theEvent|
|00000fa0| 2e 77 68 61 74 3d 3d 61 | 75 74 6f 4b 65 79 29 0d |.what==a|utoKey).|
|00000fb0| 09 09 7b 0d 09 09 09 69 | 66 20 28 28 74 68 65 45 |..{....i|f ((theE|
|00000fc0| 76 65 6e 74 2e 6d 65 73 | 73 61 67 65 20 26 20 63 |vent.mes|sage & c|
|00000fd0| 68 61 72 43 6f 64 65 4d | 61 73 6b 29 3d 3d 27 5c |harCodeM|ask)=='\|
|00000fe0| 72 27 20 7c 7c 20 28 74 | 68 65 45 76 65 6e 74 2e |r' || (t|heEvent.|
|00000ff0| 6d 65 73 73 61 67 65 20 | 26 20 63 68 61 72 43 6f |message |& charCo|
|00001000| 64 65 4d 61 73 6b 29 3d | 3d 30 78 30 33 29 0d 09 |deMask)=|=0x03)..|
|00001010| 09 09 09 69 74 65 6d 48 | 69 74 20 3d 20 28 28 44 |...itemH|it = ((D|
|00001020| 69 61 6c 6f 67 50 65 65 | 6b 29 20 74 68 65 44 50 |ialogPee|k) theDP|
|00001030| 74 72 29 2d 3e 61 44 65 | 66 49 74 65 6d 3b 0d 09 |tr)->aDe|fItem;..|
|00001040| 09 09 65 6c 73 65 0d 09 | 09 09 09 53 79 73 42 65 |..else..|...SysBe|
|00001050| 65 70 28 31 29 3b 0d 09 | 09 7d 0d 09 09 0d 09 09 |ep(1);..|.}......|
|00001060| 65 6c 73 65 0d 09 09 7b | 0d 09 09 09 74 65 6d 70 |else...{|....temp|
|00001070| 44 50 74 72 20 3d 20 28 | 44 69 61 6c 6f 67 50 74 |DPtr = (|DialogPt|
|00001080| 72 29 20 30 4c 3b 0d 09 | 09 09 0d 09 09 09 69 66 |r) 0L;..|......if|
|00001090| 20 28 21 49 73 44 69 61 | 6c 6f 67 45 76 65 6e 74 | (!IsDia|logEvent|
|000010a0| 28 26 74 68 65 45 76 65 | 6e 74 29 20 7c 7c 20 21 |(&theEve|nt) || !|
|000010b0| 44 69 61 6c 6f 67 53 65 | 6c 65 63 74 28 26 74 68 |DialogSe|lect(&th|
|000010c0| 65 45 76 65 6e 74 2c 26 | 74 65 6d 70 44 50 74 72 |eEvent,&|tempDPtr|
|000010d0| 2c 26 69 74 65 6d 48 69 | 74 29 20 7c 7c 20 74 65 |,&itemHi|t) || te|
|000010e0| 6d 70 44 50 74 72 21 3d | 74 68 65 44 50 74 72 29 |mpDPtr!=|theDPtr)|
|000010f0| 0d 09 09 09 09 69 74 65 | 6d 48 69 74 20 3d 20 30 |.....ite|mHit = 0|
|00001100| 3b 0d 09 09 7d 0d 09 09 | 0d 09 7d 20 77 68 69 6c |;...}...|..} whil|
|00001110| 65 20 28 69 74 65 6d 48 | 69 74 21 3d 31 29 3b 0d |e (itemH|it!=1);.|
|00001120| 09 0d 09 44 69 73 70 6f | 73 44 69 61 6c 6f 67 28 |...Dispo|sDialog(|
|00001130| 74 68 65 44 50 74 72 29 | 3b 0d 09 53 65 74 50 6f |theDPtr)|;..SetPo|
|00001140| 72 74 28 6f 6c 64 50 6f | 72 74 29 3b 0d 7d 0d 0d |rt(oldPo|rt);.}..|
|00001150| 0d 0d 0d 0d 53 65 74 55 | 70 4d 65 6e 75 73 28 29 |....SetU|pMenus()|
|00001160| 0d 7b 0d 73 68 6f 72 74 | 09 09 09 69 2c 6e 75 6d |.{.short|...i,num|
|00001170| 44 41 73 3b 0d 0d 09 6d | 79 4d 65 6e 75 73 5b 61 |DAs;...m|yMenus[a|
|00001180| 70 70 6c 65 4d 65 6e 75 | 5d 20 3d 20 47 65 74 4d |ppleMenu|] = GetM|
|00001190| 65 6e 75 28 61 70 70 6c | 65 49 44 29 3b 0d 09 41 |enu(appl|eID);..A|
|000011a0| 64 64 52 65 73 4d 65 6e | 75 28 6d 79 4d 65 6e 75 |ddResMen|u(myMenu|
|000011b0| 73 5b 61 70 70 6c 65 4d | 65 6e 75 5d 2c 27 44 52 |s[appleM|enu],'DR|
|000011c0| 56 52 27 29 3b 0d 09 6d | 79 4d 65 6e 75 73 5b 66 |VR');..m|yMenus[f|
|000011d0| 69 6c 65 4d 65 6e 75 5d | 20 3d 20 47 65 74 4d 65 |ileMenu]| = GetMe|
|000011e0| 6e 75 28 66 69 6c 65 49 | 44 29 3b 0d 09 6d 79 4d |nu(fileI|D);..myM|
|000011f0| 65 6e 75 73 5b 65 64 69 | 74 4d 65 6e 75 5d 20 3d |enus[edi|tMenu] =|
|00001200| 20 47 65 74 4d 65 6e 75 | 28 65 64 69 74 49 44 29 | GetMenu|(editID)|
|00001210| 3b 0d 09 6d 79 4d 65 6e | 75 73 5b 66 6f 6e 74 4d |;..myMen|us[fontM|
|00001220| 65 6e 75 5d 20 3d 20 47 | 65 74 4d 65 6e 75 28 66 |enu] = G|etMenu(f|
|00001230| 6f 6e 74 49 44 29 3b 0d | 09 49 6e 73 65 72 74 52 |ontID);.|.InsertR|
|00001240| 65 73 4d 65 6e 75 28 6d | 79 4d 65 6e 75 73 5b 66 |esMenu(m|yMenus[f|
|00001250| 6f 6e 74 4d 65 6e 75 5d | 2c 27 46 4f 4e 54 27 2c |ontMenu]|,'FONT',|
|00001260| 30 29 3b 0d 09 0d 09 49 | 6e 73 65 72 74 4d 65 6e |0);....I|nsertMen|
|00001270| 75 28 6d 79 4d 65 6e 75 | 73 5b 61 70 70 6c 65 4d |u(myMenu|s[appleM|
|00001280| 65 6e 75 5d 2c 30 29 3b | 0d 09 49 6e 73 65 72 74 |enu],0);|..Insert|
|00001290| 4d 65 6e 75 28 6d 79 4d | 65 6e 75 73 5b 66 69 6c |Menu(myM|enus[fil|
|000012a0| 65 4d 65 6e 75 5d 2c 30 | 29 3b 0d 09 49 6e 73 65 |eMenu],0|);..Inse|
|000012b0| 72 74 4d 65 6e 75 28 6d | 79 4d 65 6e 75 73 5b 65 |rtMenu(m|yMenus[e|
|000012c0| 64 69 74 4d 65 6e 75 5d | 2c 30 29 3b 0d 09 49 6e |ditMenu]|,0);..In|
|000012d0| 73 65 72 74 4d 65 6e 75 | 28 6d 79 4d 65 6e 75 73 |sertMenu|(myMenus|
|000012e0| 5b 66 6f 6e 74 4d 65 6e | 75 5d 2c 30 29 3b 0d 09 |[fontMen|u],0);..|
|000012f0| 0d 09 44 72 61 77 4d 65 | 6e 75 42 61 72 28 29 3b |..DrawMe|nuBar();|
|00001300| 0d 09 0d 09 6e 75 6d 44 | 41 73 20 3d 20 43 6f 75 |....numD|As = Cou|
|00001310| 6e 74 4d 49 74 65 6d 73 | 28 6d 79 4d 65 6e 75 73 |ntMItems|(myMenus|
|00001320| 5b 61 70 70 6c 65 4d 65 | 6e 75 5d 29 3b 0d 09 0d |[appleMe|nu]);...|
|00001330| 09 66 6f 72 20 28 69 3d | 31 3b 69 3c 3d 6e 75 6d |.for (i=|1;i<=num|
|00001340| 44 41 73 3b 69 2b 2b 29 | 0d 09 09 45 6e 61 62 6c |DAs;i++)|...Enabl|
|00001350| 65 49 74 65 6d 28 6d 79 | 4d 65 6e 75 73 5b 61 70 |eItem(my|Menus[ap|
|00001360| 70 6c 65 4d 65 6e 75 5d | 2c 69 29 3b 0d 7d 0d 0d |pleMenu]|,i);.}..|
|00001370| 0d 0d 4d 61 73 68 6f 72 | 74 61 69 6e 4d 65 6e 75 |..Mashor|tainMenu|
|00001380| 73 28 29 0d 7b 0d 73 68 | 6f 72 74 09 09 69 2c 6e |s().{.sh|ort..i,n|
|00001390| 75 6d 49 74 65 6d 73 3b | 0d 0d 09 69 66 20 28 74 |umItems;|...if (t|
|000013a0| 68 65 57 50 74 72 20 26 | 26 20 46 72 6f 6e 74 57 |heWPtr &|& FrontW|
|000013b0| 69 6e 64 6f 77 28 29 20 | 3d 3d 20 74 68 65 57 50 |indow() |== theWP|
|000013c0| 74 72 29 0d 09 7b 0d 09 | 09 44 69 73 61 62 6c 65 |tr)..{..|.Disable|
|000013d0| 49 74 65 6d 28 6d 79 4d | 65 6e 75 73 5b 66 69 6c |Item(myM|enus[fil|
|000013e0| 65 4d 65 6e 75 5d 2c 6e | 65 77 43 6f 6d 6d 61 6e |eMenu],n|ewComman|
|000013f0| 64 29 3b 0d 09 09 44 69 | 73 61 62 6c 65 49 74 65 |d);...Di|sableIte|
|00001400| 6d 28 6d 79 4d 65 6e 75 | 73 5b 66 69 6c 65 4d 65 |m(myMenu|s[fileMe|
|00001410| 6e 75 5d 2c 6f 70 65 6e | 43 6f 6d 6d 61 6e 64 29 |nu],open|Command)|
|00001420| 3b 0d 09 09 45 6e 61 62 | 6c 65 49 74 65 6d 28 6d |;...Enab|leItem(m|
|00001430| 79 4d 65 6e 75 73 5b 66 | 69 6c 65 4d 65 6e 75 5d |yMenus[f|ileMenu]|
|00001440| 2c 69 6e 73 65 72 74 43 | 6f 6d 6d 61 6e 64 29 3b |,insertC|ommand);|
|00001450| 0d 09 09 45 6e 61 62 6c | 65 49 74 65 6d 28 6d 79 |...Enabl|eItem(my|
|00001460| 4d 65 6e 75 73 5b 66 69 | 6c 65 4d 65 6e 75 5d 2c |Menus[fi|leMenu],|
|00001470| 63 6c 6f 73 65 43 6f 6d | 6d 61 6e 64 29 3b 0d 09 |closeCom|mand);..|
|00001480| 09 0d 09 09 69 66 20 28 | 63 68 61 6e 67 65 64 29 |....if (|changed)|
|00001490| 0d 09 09 09 45 6e 61 62 | 6c 65 49 74 65 6d 28 6d |....Enab|leItem(m|
|000014a0| 79 4d 65 6e 75 73 5b 66 | 69 6c 65 4d 65 6e 75 5d |yMenus[f|ileMenu]|
|000014b0| 2c 73 61 76 65 43 6f 6d | 6d 61 6e 64 29 3b 0d 09 |,saveCom|mand);..|
|000014c0| 09 65 6c 73 65 0d 09 09 | 09 44 69 73 61 62 6c 65 |.else...|.Disable|
|000014d0| 49 74 65 6d 28 6d 79 4d | 65 6e 75 73 5b 66 69 6c |Item(myM|enus[fil|
|000014e0| 65 4d 65 6e 75 5d 2c 73 | 61 76 65 43 6f 6d 6d 61 |eMenu],s|aveComma|
|000014f0| 6e 64 29 3b 0d 09 09 0d | 09 09 45 6e 61 62 6c 65 |nd);....|..Enable|
|00001500| 49 74 65 6d 28 6d 79 4d | 65 6e 75 73 5b 66 69 6c |Item(myM|enus[fil|
|00001510| 65 4d 65 6e 75 5d 2c 73 | 61 76 65 41 73 43 6f 6d |eMenu],s|aveAsCom|
|00001520| 6d 61 6e 64 29 3b 0d 09 | 09 0d 09 09 0d 09 09 44 |mand);..|.......D|
|00001530| 69 73 61 62 6c 65 49 74 | 65 6d 28 6d 79 4d 65 6e |isableIt|em(myMen|
|00001540| 75 73 5b 65 64 69 74 4d | 65 6e 75 5d 2c 75 6e 64 |us[editM|enu],und|
|00001550| 6f 43 6f 6d 6d 61 6e 64 | 29 3b 0d 09 09 0d 09 09 |oCommand|);......|
|00001560| 69 66 20 28 74 68 65 54 | 45 48 33 32 4b 29 0d 09 |if (theT|EH32K)..|
|00001570| 09 7b 0d 09 09 09 69 66 | 20 28 28 2a 2a 74 68 65 |.{....if| ((**the|
|00001580| 54 45 48 33 32 4b 29 2e | 73 65 6c 53 74 61 72 74 |TEH32K).|selStart|
|00001590| 20 3d 3d 20 28 2a 2a 74 | 68 65 54 45 48 33 32 4b | == (**t|heTEH32K|
|000015a0| 29 2e 73 65 6c 45 6e 64 | 29 0d 09 09 09 7b 0d 09 |).selEnd|)....{..|
|000015b0| 09 09 09 44 69 73 61 62 | 6c 65 49 74 65 6d 28 6d |...Disab|leItem(m|
|000015c0| 79 4d 65 6e 75 73 5b 65 | 64 69 74 4d 65 6e 75 5d |yMenus[e|ditMenu]|
|000015d0| 2c 63 75 74 43 6f 6d 6d | 61 6e 64 29 3b 0d 09 09 |,cutComm|and);...|
|000015e0| 09 09 44 69 73 61 62 6c | 65 49 74 65 6d 28 6d 79 |..Disabl|eItem(my|
|000015f0| 4d 65 6e 75 73 5b 65 64 | 69 74 4d 65 6e 75 5d 2c |Menus[ed|itMenu],|
|00001600| 63 6f 70 79 43 6f 6d 6d | 61 6e 64 29 3b 0d 09 09 |copyComm|and);...|
|00001610| 09 09 44 69 73 61 62 6c | 65 49 74 65 6d 28 6d 79 |..Disabl|eItem(my|
|00001620| 4d 65 6e 75 73 5b 65 64 | 69 74 4d 65 6e 75 5d 2c |Menus[ed|itMenu],|
|00001630| 63 6c 65 61 72 43 6f 6d | 6d 61 6e 64 29 3b 0d 09 |clearCom|mand);..|
|00001640| 09 09 7d 0d 09 09 09 0d | 09 09 09 65 6c 73 65 0d |..}.....|...else.|
|00001650| 09 09 09 7b 0d 09 09 09 | 09 45 6e 61 62 6c 65 49 |...{....|.EnableI|
|00001660| 74 65 6d 28 6d 79 4d 65 | 6e 75 73 5b 65 64 69 74 |tem(myMe|nus[edit|
|00001670| 4d 65 6e 75 5d 2c 63 75 | 74 43 6f 6d 6d 61 6e 64 |Menu],cu|tCommand|
|00001680| 29 3b 0d 09 09 09 09 45 | 6e 61 62 6c 65 49 74 65 |);.....E|nableIte|
|00001690| 6d 28 6d 79 4d 65 6e 75 | 73 5b 65 64 69 74 4d 65 |m(myMenu|s[editMe|
|000016a0| 6e 75 5d 2c 63 6f 70 79 | 43 6f 6d 6d 61 6e 64 29 |nu],copy|Command)|
|000016b0| 3b 0d 09 09 09 09 45 6e | 61 62 6c 65 49 74 65 6d |;.....En|ableItem|
|000016c0| 28 6d 79 4d 65 6e 75 73 | 5b 65 64 69 74 4d 65 6e |(myMenus|[editMen|
|000016d0| 75 5d 2c 63 6c 65 61 72 | 43 6f 6d 6d 61 6e 64 29 |u],clear|Command)|
|000016e0| 3b 0d 09 09 09 7d 0d 09 | 09 09 0d 09 09 09 69 66 |;....}..|......if|
|000016f0| 20 28 54 45 33 32 4b 47 | 65 74 53 63 72 61 70 4c | (TE32KG|etScrapL|
|00001700| 65 6e 28 29 20 3e 20 30 | 4c 29 0d 09 09 09 09 45 |en() > 0|L).....E|
|00001710| 6e 61 62 6c 65 49 74 65 | 6d 28 6d 79 4d 65 6e 75 |nableIte|m(myMenu|
|00001720| 73 5b 65 64 69 74 4d 65 | 6e 75 5d 2c 70 61 73 74 |s[editMe|nu],past|
|00001730| 65 43 6f 6d 6d 61 6e 64 | 29 3b 0d 09 09 09 65 6c |eCommand|);....el|
|00001740| 73 65 0d 09 09 09 09 44 | 69 73 61 62 6c 65 49 74 |se.....D|isableIt|
|00001750| 65 6d 28 6d 79 4d 65 6e | 75 73 5b 65 64 69 74 4d |em(myMen|us[editM|
|00001760| 65 6e 75 5d 2c 70 61 73 | 74 65 43 6f 6d 6d 61 6e |enu],pas|teComman|
|00001770| 64 29 3b 0d 09 09 09 0d | 09 09 09 45 6e 61 62 6c |d);.....|...Enabl|
|00001780| 65 49 74 65 6d 28 6d 79 | 4d 65 6e 75 73 5b 65 64 |eItem(my|Menus[ed|
|00001790| 69 74 4d 65 6e 75 5d 2c | 73 65 6c 65 63 74 43 6f |itMenu],|selectCo|
|000017a0| 6d 6d 61 6e 64 29 3b 0d | 09 09 09 45 6e 61 62 6c |mmand);.|...Enabl|
|000017b0| 65 49 74 65 6d 28 6d 79 | 4d 65 6e 75 73 5b 65 64 |eItem(my|Menus[ed|
|000017c0| 69 74 4d 65 6e 75 5d 2c | 77 72 61 70 43 6f 6d 6d |itMenu],|wrapComm|
|000017d0| 61 6e 64 29 3b 0d 09 09 | 09 0d 09 09 09 69 66 20 |and);...|.....if |
|000017e0| 28 74 68 65 54 45 48 33 | 32 4b 20 26 26 20 21 28 |(theTEH3|2K && !(|
|000017f0| 2a 2a 74 68 65 54 45 48 | 33 32 4b 29 2e 63 72 4f |**theTEH|32K).crO|
|00001800| 6e 6c 79 29 0d 09 09 09 | 7b 0d 09 09 09 09 43 68 |nly)....|{.....Ch|
|00001810| 65 63 6b 49 74 65 6d 28 | 6d 79 4d 65 6e 75 73 5b |eckItem(|myMenus[|
|00001820| 65 64 69 74 4d 65 6e 75 | 5d 2c 77 72 61 70 43 6f |editMenu|],wrapCo|
|00001830| 6d 6d 61 6e 64 2c 74 72 | 75 65 29 3b 0d 09 09 09 |mmand,tr|ue);....|
|00001840| 09 53 65 74 49 74 65 6d | 4d 61 72 6b 28 6d 79 4d |.SetItem|Mark(myM|
|00001850| 65 6e 75 73 5b 65 64 69 | 74 4d 65 6e 75 5d 2c 77 |enus[edi|tMenu],w|
|00001860| 72 61 70 43 6f 6d 6d 61 | 6e 64 2c 63 68 65 63 6b |rapComma|nd,check|
|00001870| 4d 61 72 6b 29 3b 0d 09 | 09 09 7d 0d 09 09 09 09 |Mark);..|..}.....|
|00001880| 0d 09 09 09 65 6c 73 65 | 0d 09 09 09 09 43 68 65 |....else|.....Che|
|00001890| 63 6b 49 74 65 6d 28 6d | 79 4d 65 6e 75 73 5b 65 |ckItem(m|yMenus[e|
|000018a0| 64 69 74 4d 65 6e 75 5d | 2c 77 72 61 70 43 6f 6d |ditMenu]|,wrapCom|
|000018b0| 6d 61 6e 64 2c 66 61 6c | 73 65 29 3b 0d 09 09 7d |mand,fal|se);...}|
|000018c0| 0d 09 09 0d 09 09 0d 09 | 09 6e 75 6d 49 74 65 6d |........|.numItem|
|000018d0| 73 20 3d 20 43 6f 75 6e | 74 4d 49 74 65 6d 73 28 |s = Coun|tMItems(|
|000018e0| 6d 79 4d 65 6e 75 73 5b | 66 6f 6e 74 4d 65 6e 75 |myMenus[|fontMenu|
|000018f0| 5d 29 3b 0d 09 09 0d 09 | 09 66 6f 72 20 28 69 3d |]);.....|.for (i=|
|00001900| 31 3b 69 3c 3d 6e 75 6d | 49 74 65 6d 73 3b 69 2b |1;i<=num|Items;i+|
|00001910| 2b 29 0d 09 09 09 45 6e | 61 62 6c 65 49 74 65 6d |+)....En|ableItem|
|00001920| 28 6d 79 4d 65 6e 75 73 | 5b 66 6f 6e 74 4d 65 6e |(myMenus|[fontMen|
|00001930| 75 5d 2c 69 29 3b 0d 09 | 09 0d 09 09 4d 61 73 68 |u],i);..|....Mash|
|00001940| 6f 72 74 61 69 6e 46 6f | 6e 74 4d 65 6e 75 28 29 |ortainFo|ntMenu()|
|00001950| 3b 0d 09 7d 0d 09 0d 09 | 65 6c 73 65 0d 09 7b 0d |;..}....|else..{.|
|00001960| 09 09 45 6e 61 62 6c 65 | 49 74 65 6d 28 6d 79 4d |..Enable|Item(myM|
|00001970| 65 6e 75 73 5b 66 69 6c | 65 4d 65 6e 75 5d 2c 6e |enus[fil|eMenu],n|
|00001980| 65 77 43 6f 6d 6d 61 6e | 64 29 3b 0d 09 09 45 6e |ewComman|d);...En|
|00001990| 61 62 6c 65 49 74 65 6d | 28 6d 79 4d 65 6e 75 73 |ableItem|(myMenus|
|000019a0| 5b 66 69 6c 65 4d 65 6e | 75 5d 2c 6f 70 65 6e 43 |[fileMen|u],openC|
|000019b0| 6f 6d 6d 61 6e 64 29 3b | 0d 09 09 44 69 73 61 62 |ommand);|...Disab|
|000019c0| 6c 65 49 74 65 6d 28 6d | 79 4d 65 6e 75 73 5b 66 |leItem(m|yMenus[f|
|000019d0| 69 6c 65 4d 65 6e 75 5d | 2c 69 6e 73 65 72 74 43 |ileMenu]|,insertC|
|000019e0| 6f 6d 6d 61 6e 64 29 3b | 0d 09 09 44 69 73 61 62 |ommand);|...Disab|
|000019f0| 6c 65 49 74 65 6d 28 6d | 79 4d 65 6e 75 73 5b 66 |leItem(m|yMenus[f|
|00001a00| 69 6c 65 4d 65 6e 75 5d | 2c 63 6c 6f 73 65 43 6f |ileMenu]|,closeCo|
|00001a10| 6d 6d 61 6e 64 29 3b 0d | 09 09 44 69 73 61 62 6c |mmand);.|..Disabl|
|00001a20| 65 49 74 65 6d 28 6d 79 | 4d 65 6e 75 73 5b 66 69 |eItem(my|Menus[fi|
|00001a30| 6c 65 4d 65 6e 75 5d 2c | 73 61 76 65 43 6f 6d 6d |leMenu],|saveComm|
|00001a40| 61 6e 64 29 3b 0d 09 09 | 44 69 73 61 62 6c 65 49 |and);...|DisableI|
|00001a50| 74 65 6d 28 6d 79 4d 65 | 6e 75 73 5b 66 69 6c 65 |tem(myMe|nus[file|
|00001a60| 4d 65 6e 75 5d 2c 73 61 | 76 65 41 73 43 6f 6d 6d |Menu],sa|veAsComm|
|00001a70| 61 6e 64 29 3b 0d 09 09 | 0d 09 09 0d 09 09 45 6e |and);...|......En|
|00001a80| 61 62 6c 65 49 74 65 6d | 28 6d 79 4d 65 6e 75 73 |ableItem|(myMenus|
|00001a90| 5b 65 64 69 74 4d 65 6e | 75 5d 2c 75 6e 64 6f 43 |[editMen|u],undoC|
|00001aa0| 6f 6d 6d 61 6e 64 29 3b | 0d 09 09 45 6e 61 62 6c |ommand);|...Enabl|
|00001ab0| 65 49 74 65 6d 28 6d 79 | 4d 65 6e 75 73 5b 65 64 |eItem(my|Menus[ed|
|00001ac0| 69 74 4d 65 6e 75 5d 2c | 63 75 74 43 6f 6d 6d 61 |itMenu],|cutComma|
|00001ad0| 6e 64 29 3b 0d 09 09 45 | 6e 61 62 6c 65 49 74 65 |nd);...E|nableIte|
|00001ae0| 6d 28 6d 79 4d 65 6e 75 | 73 5b 65 64 69 74 4d 65 |m(myMenu|s[editMe|
|00001af0| 6e 75 5d 2c 63 6f 70 79 | 43 6f 6d 6d 61 6e 64 29 |nu],copy|Command)|
|00001b00| 3b 0d 09 09 45 6e 61 62 | 6c 65 49 74 65 6d 28 6d |;...Enab|leItem(m|
|00001b10| 79 4d 65 6e 75 73 5b 65 | 64 69 74 4d 65 6e 75 5d |yMenus[e|ditMenu]|
|00001b20| 2c 70 61 73 74 65 43 6f | 6d 6d 61 6e 64 29 3b 0d |,pasteCo|mmand);.|
|00001b30| 09 09 45 6e 61 62 6c 65 | 49 74 65 6d 28 6d 79 4d |..Enable|Item(myM|
|00001b40| 65 6e 75 73 5b 65 64 69 | 74 4d 65 6e 75 5d 2c 63 |enus[edi|tMenu],c|
|00001b50| 6c 65 61 72 43 6f 6d 6d | 61 6e 64 29 3b 0d 09 09 |learComm|and);...|
|00001b60| 44 69 73 61 62 6c 65 49 | 74 65 6d 28 6d 79 4d 65 |DisableI|tem(myMe|
|00001b70| 6e 75 73 5b 65 64 69 74 | 4d 65 6e 75 5d 2c 73 65 |nus[edit|Menu],se|
|00001b80| 6c 65 63 74 43 6f 6d 6d | 61 6e 64 29 3b 0d 09 09 |lectComm|and);...|
|00001b90| 44 69 73 61 62 6c 65 49 | 74 65 6d 28 6d 79 4d 65 |DisableI|tem(myMe|
|00001ba0| 6e 75 73 5b 65 64 69 74 | 4d 65 6e 75 5d 2c 77 72 |nus[edit|Menu],wr|
|00001bb0| 61 70 43 6f 6d 6d 61 6e | 64 29 3b 0d 09 09 43 68 |apComman|d);...Ch|
|00001bc0| 65 63 6b 49 74 65 6d 28 | 6d 79 4d 65 6e 75 73 5b |eckItem(|myMenus[|
|00001bd0| 65 64 69 74 4d 65 6e 75 | 5d 2c 77 72 61 70 43 6f |editMenu|],wrapCo|
|00001be0| 6d 6d 61 6e 64 2c 66 61 | 6c 73 65 29 3b 0d 09 09 |mmand,fa|lse);...|
|00001bf0| 0d 09 09 6e 75 6d 49 74 | 65 6d 73 20 3d 20 43 6f |...numIt|ems = Co|
|00001c00| 75 6e 74 4d 49 74 65 6d | 73 28 6d 79 4d 65 6e 75 |untMItem|s(myMenu|
|00001c10| 73 5b 66 6f 6e 74 4d 65 | 6e 75 5d 29 3b 0d 09 09 |s[fontMe|nu]);...|
|00001c20| 0d 09 09 66 6f 72 20 28 | 69 3d 31 3b 69 3c 3d 6e |...for (|i=1;i<=n|
|00001c30| 75 6d 49 74 65 6d 73 3b | 69 2b 2b 29 0d 09 09 7b |umItems;|i++)...{|
|00001c40| 0d 09 09 09 44 69 73 61 | 62 6c 65 49 74 65 6d 28 |....Disa|bleItem(|
|00001c50| 6d 79 4d 65 6e 75 73 5b | 66 6f 6e 74 4d 65 6e 75 |myMenus[|fontMenu|
|00001c60| 5d 2c 69 29 3b 0d 09 09 | 09 43 68 65 63 6b 49 74 |],i);...|.CheckIt|
|00001c70| 65 6d 28 6d 79 4d 65 6e | 75 73 5b 66 6f 6e 74 4d |em(myMen|us[fontM|
|00001c80| 65 6e 75 5d 2c 69 2c 66 | 61 6c 73 65 29 3b 0d 09 |enu],i,f|alse);..|
|00001c90| 09 7d 0d 09 7d 0d 0d 7d | 0d 0d 0d 44 6f 43 6f 6d |.}..}..}|...DoCom|
|00001ca0| 6d 61 6e 64 28 6d 52 65 | 73 75 6c 74 29 0d 6c 6f |mand(mRe|sult).lo|
|00001cb0| 6e 67 20 6d 52 65 73 75 | 6c 74 3b 0d 7b 0d 73 68 |ng mResu|lt;.{.sh|
|00001cc0| 6f 72 74 09 09 09 74 68 | 65 49 74 65 6d 2c 6e 75 |ort...th|eItem,nu|
|00001cd0| 6d 49 74 65 6d 73 3b 0d | 47 72 61 66 50 74 72 09 |mItems;.|GrafPtr.|
|00001ce0| 09 6f 6c 64 50 6f 72 74 | 3b 0d 53 46 52 65 70 6c |.oldPort|;.SFRepl|
|00001cf0| 79 09 09 6f 6c 64 53 46 | 52 65 70 6c 79 3b 0d 52 |y..oldSF|Reply;.R|
|00001d00| 65 63 74 09 09 74 65 6d | 70 52 65 63 74 3b 0d 0d |ect..tem|pRect;..|
|00001d10| 0d 09 74 68 65 49 74 65 | 6d 20 3d 20 4c 6f 57 6f |..theIte|m = LoWo|
|00001d20| 72 64 28 6d 52 65 73 75 | 6c 74 29 3b 0d 09 0d 09 |rd(mResu|lt);....|
|00001d30| 73 77 69 74 63 68 20 28 | 48 69 57 6f 72 64 28 6d |switch (|HiWord(m|
|00001d40| 52 65 73 75 6c 74 29 29 | 20 0d 09 7b 0d 09 09 63 |Result))| ..{...c|
|00001d50| 61 73 65 20 61 70 70 6c | 65 49 44 3a 0d 09 09 09 |ase appl|eID:....|
|00001d60| 69 66 20 28 74 68 65 49 | 74 65 6d 20 3d 3d 20 31 |if (theI|tem == 1|
|00001d70| 29 0d 09 09 09 7b 0d 09 | 09 09 09 44 6f 41 62 6f |)....{..|...DoAbo|
|00001d80| 75 74 42 6f 78 28 30 29 | 3b 0d 09 09 09 7d 0d 09 |utBox(0)|;....}..|
|00001d90| 09 09 0d 09 09 09 65 6c | 73 65 0d 09 09 09 7b 0d |......el|se....{.|
|00001da0| 09 09 09 09 47 65 74 50 | 6f 72 74 28 26 6f 6c 64 |....GetP|ort(&old|
|00001db0| 50 6f 72 74 29 3b 0d 09 | 09 09 09 47 65 74 49 74 |Port);..|...GetIt|
|00001dc0| 65 6d 28 6d 79 4d 65 6e | 75 73 5b 61 70 70 6c 65 |em(myMen|us[apple|
|00001dd0| 4d 65 6e 75 5d 2c 20 74 | 68 65 49 74 65 6d 2c 20 |Menu], t|heItem, |
|00001de0| 28 75 6e 73 69 67 6e 65 | 64 20 63 68 61 72 20 2a |(unsigne|d char *|
|00001df0| 29 20 74 65 6d 70 53 74 | 72 69 6e 67 29 3b 0d 09 |) tempSt|ring);..|
|00001e00| 09 09 09 4f 70 65 6e 44 | 65 73 6b 41 63 63 28 28 |...OpenD|eskAcc((|
|00001e10| 75 6e 73 69 67 6e 65 64 | 20 63 68 61 72 20 2a 29 |unsigned| char *)|
|00001e20| 20 74 65 6d 70 53 74 72 | 69 6e 67 29 3b 0d 09 09 | tempStr|ing);...|
|00001e30| 09 09 53 65 74 50 6f 72 | 74 28 6f 6c 64 50 6f 72 |..SetPor|t(oldPor|
|00001e40| 74 29 3b 0d 09 09 09 7d | 0d 09 09 09 0d 09 09 09 |t);....}|........|
|00001e50| 62 72 65 61 6b 3b 0d 09 | 09 09 0d 09 09 63 61 73 |break;..|.....cas|
|00001e60| 65 20 66 69 6c 65 49 44 | 3a 0d 09 09 09 73 77 69 |e fileID|:....swi|
|00001e70| 74 63 68 20 28 74 68 65 | 49 74 65 6d 29 0d 09 09 |tch (the|Item)...|
|00001e80| 09 7b 0d 09 09 09 09 63 | 61 73 65 20 6e 65 77 43 |.{.....c|ase newC|
|00001e90| 6f 6d 6d 61 6e 64 3a 0d | 09 09 09 09 09 69 66 20 |ommand:.|.....if |
|00001ea0| 28 21 74 68 65 54 45 48 | 33 32 4b 29 0d 09 09 09 |(!theTEH|32K)....|
|00001eb0| 09 09 09 44 6f 53 68 6f | 77 57 69 6e 64 6f 77 28 |...DoSho|wWindow(|
|00001ec0| 29 3b 0d 09 09 09 09 09 | 65 6c 73 65 0d 09 09 09 |);......|else....|
|00001ed0| 09 09 09 53 79 73 42 65 | 65 70 28 31 29 3b 0d 09 |...SysBe|ep(1);..|
|00001ee0| 09 09 09 09 0d 09 09 09 | 09 09 62 72 65 61 6b 3b |........|..break;|
|00001ef0| 0d 09 09 09 09 0d 09 09 | 09 09 63 61 73 65 20 6f |........|..case o|
|00001f00| 70 65 6e 43 6f 6d 6d 61 | 6e 64 3a 0d 09 09 09 09 |penComma|nd:.....|
|00001f10| 09 69 66 20 28 74 68 65 | 54 45 48 33 32 4b 20 26 |.if (the|TEH32K &|
|00001f20| 26 20 44 6f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 28 |& DoClos|eWindow(|
|00001f30| 74 68 65 57 50 74 72 29 | 29 0d 09 09 09 09 09 7b |theWPtr)|)......{|
|00001f40| 0d 09 09 09 09 09 09 44 | 6f 53 68 6f 77 57 69 6e |.......D|oShowWin|
|00001f50| 64 6f 77 28 29 3b 0d 09 | 09 09 09 09 09 0d 09 09 |dow();..|........|
|00001f60| 09 09 09 09 69 66 20 28 | 4f 70 65 6e 54 65 78 74 |....if (|OpenText|
|00001f70| 46 69 6c 65 28 74 68 65 | 54 45 48 33 32 4b 2c 26 |File(the|TEH32K,&|
|00001f80| 6d 79 53 46 52 65 70 6c | 79 29 29 0d 09 09 09 09 |mySFRepl|y)).....|
|00001f90| 09 09 7b 0d 09 09 09 09 | 09 09 09 53 65 74 57 54 |..{.....|...SetWT|
|00001fa0| 69 74 6c 65 28 74 68 65 | 57 50 74 72 2c 6d 79 53 |itle(the|WPtr,myS|
|00001fb0| 46 52 65 70 6c 79 2e 66 | 4e 61 6d 65 29 3b 0d 09 |FReply.f|Name);..|
|00001fc0| 09 09 09 09 09 09 41 64 | 6a 75 73 74 53 63 72 6f |......Ad|justScro|
|00001fd0| 6c 6c 42 61 72 28 29 3b | 0d 09 09 09 09 09 09 09 |llBar();|........|
|00001fe0| 63 68 61 6e 67 65 64 20 | 3d 20 66 61 6c 73 65 3b |changed |= false;|
|00001ff0| 0d 09 09 09 09 09 09 7d | 0d 09 09 09 09 09 7d 0d |.......}|......}.|
|00002000| 09 09 09 09 09 0d 09 09 | 09 09 09 65 6c 73 65 20 |........|...else |
|00002010| 69 66 20 28 21 74 68 65 | 54 45 48 33 32 4b 29 0d |if (!the|TEH32K).|
|00002020| 09 09 09 09 09 7b 0d 09 | 09 09 09 09 09 44 6f 53 |.....{..|.....DoS|
|00002030| 68 6f 77 57 69 6e 64 6f | 77 28 29 3b 0d 09 09 09 |howWindo|w();....|
|00002040| 09 09 09 0d 09 09 09 09 | 09 09 69 66 20 28 4f 70 |........|..if (Op|
|00002050| 65 6e 54 65 78 74 46 69 | 6c 65 28 74 68 65 54 45 |enTextFi|le(theTE|
|00002060| 48 33 32 4b 2c 26 6d 79 | 53 46 52 65 70 6c 79 29 |H32K,&my|SFReply)|
|00002070| 29 0d 09 09 09 09 09 09 | 7b 0d 09 09 09 09 09 09 |).......|{.......|
|00002080| 09 53 65 74 57 54 69 74 | 6c 65 28 74 68 65 57 50 |.SetWTit|le(theWP|
|00002090| 74 72 2c 6d 79 53 46 52 | 65 70 6c 79 2e 66 4e 61 |tr,mySFR|eply.fNa|
|000020a0| 6d 65 29 3b 0d 09 09 09 | 09 09 09 09 41 64 6a 75 |me);....|....Adju|
|000020b0| 73 74 53 63 72 6f 6c 6c | 42 61 72 28 29 3b 0d 09 |stScroll|Bar();..|
|000020c0| 09 09 09 09 09 09 63 68 | 61 6e 67 65 64 20 3d 20 |......ch|anged = |
|000020d0| 66 61 6c 73 65 3b 0d 09 | 09 09 09 09 09 7d 0d 09 |false;..|.....}..|
|000020e0| 09 09 09 09 7d 0d 09 09 | 09 09 09 0d 09 09 09 09 |....}...|........|
|000020f0| 09 62 72 65 61 6b 3b 0d | 09 09 09 09 0d 09 09 09 |.break;.|........|
|00002100| 09 63 61 73 65 20 69 6e | 73 65 72 74 43 6f 6d 6d |.case in|sertComm|
|00002110| 61 6e 64 3a 0d 09 09 09 | 09 09 69 66 20 28 74 68 |and:....|..if (th|
|00002120| 65 54 45 48 33 32 4b 29 | 0d 09 09 09 09 09 7b 0d |eTEH32K)|......{.|
|00002130| 09 09 09 09 09 09 63 68 | 61 6e 67 65 64 20 3d 20 |......ch|anged = |
|00002140| 49 6e 73 65 72 74 54 65 | 78 74 46 69 6c 65 28 74 |InsertTe|xtFile(t|
|00002150| 68 65 54 45 48 33 32 4b | 29 3b 0d 09 09 09 09 09 |heTEH32K|);......|
|00002160| 09 0d 09 09 09 09 09 09 | 41 64 6a 75 73 74 53 63 |........|AdjustSc|
|00002170| 72 6f 6c 6c 42 61 72 28 | 29 3b 0d 09 09 09 09 09 |rollBar(|);......|
|00002180| 7d 0d 09 09 09 09 09 0d | 09 09 09 09 09 62 72 65 |}.......|.....bre|
|00002190| 61 6b 3b 0d 09 09 09 09 | 09 0d 09 09 09 09 63 61 |ak;.....|......ca|
|000021a0| 73 65 20 63 6c 6f 73 65 | 43 6f 6d 6d 61 6e 64 3a |se close|Command:|
|000021b0| 0d 09 09 09 09 09 69 66 | 20 28 74 68 65 54 45 48 |......if| (theTEH|
|000021c0| 33 32 4b 29 0d 09 09 09 | 09 09 09 44 6f 43 6c 6f |32K)....|...DoClo|
|000021d0| 73 65 57 69 6e 64 6f 77 | 28 74 68 65 57 50 74 72 |seWindow|(theWPtr|
|000021e0| 29 3b 0d 09 09 09 09 09 | 65 6c 73 65 0d 09 09 09 |);......|else....|
|000021f0| 09 09 09 53 79 73 42 65 | 65 70 28 31 29 3b 0d 09 |...SysBe|ep(1);..|
|00002200| 09 09 09 09 09 0d 09 09 | 09 09 09 62 72 65 61 6b |........|...break|
|00002210| 3b 0d 09 09 09 09 0d 09 | 09 09 09 63 61 73 65 20 |;.......|...case |
|00002220| 73 61 76 65 43 6f 6d 6d | 61 6e 64 3a 0d 09 09 09 |saveComm|and:....|
|00002230| 09 09 69 66 20 28 74 68 | 65 54 45 48 33 32 4b 29 |..if (th|eTEH32K)|
|00002240| 0d 09 09 09 09 09 7b 0d | 09 09 09 09 09 09 69 66 |......{.|......if|
|00002250| 20 28 53 61 76 65 54 65 | 78 74 46 69 6c 65 28 74 | (SaveTe|xtFile(t|
|00002260| 68 65 54 45 48 33 32 4b | 2c 26 6d 79 53 46 52 65 |heTEH32K|,&mySFRe|
|00002270| 70 6c 79 29 29 0d 09 09 | 09 09 09 09 7b 0d 09 09 |ply))...|....{...|
|00002280| 09 09 09 09 09 53 65 74 | 57 54 69 74 6c 65 28 74 |.....Set|WTitle(t|
|00002290| 68 65 57 50 74 72 2c 6d | 79 53 46 52 65 70 6c 79 |heWPtr,m|ySFReply|
|000022a0| 2e 66 4e 61 6d 65 29 3b | 0d 09 09 09 09 09 09 09 |.fName);|........|
|000022b0| 63 68 61 6e 67 65 64 20 | 3d 20 66 61 6c 73 65 3b |changed |= false;|
|000022c0| 0d 09 09 09 09 09 09 7d | 0d 09 09 09 09 09 7d 0d |.......}|......}.|
|000022d0| 09 09 09 09 09 09 0d 09 | 09 09 09 09 65 6c 73 65 |........|....else|
|000022e0| 0d 09 09 09 09 09 09 53 | 79 73 42 65 65 70 28 31 |.......S|ysBeep(1|
|000022f0| 29 3b 0d 09 09 09 09 09 | 0d 09 09 09 09 09 62 72 |);......|......br|
|00002300| 65 61 6b 3b 0d 09 09 09 | 09 0d 09 09 09 09 63 61 |eak;....|......ca|
|00002310| 73 65 20 73 61 76 65 41 | 73 43 6f 6d 6d 61 6e 64 |se saveA|sCommand|
|00002320| 3a 0d 09 09 09 09 09 69 | 66 20 28 74 68 65 54 45 |:......i|f (theTE|
|00002330| 48 33 32 4b 29 0d 09 09 | 09 09 09 7b 0d 09 09 09 |H32K)...|...{....|
|00002340| 09 09 09 6f 6c 64 53 46 | 52 65 70 6c 79 20 3d 20 |...oldSF|Reply = |
|00002350| 6d 79 53 46 52 65 70 6c | 79 3b 0d 09 09 09 09 09 |mySFRepl|y;......|
|00002360| 09 6d 79 53 46 52 65 70 | 6c 79 2e 67 6f 6f 64 20 |.mySFRep|ly.good |
|00002370| 3d 20 66 61 6c 73 65 3b | 0d 09 09 09 09 09 09 0d |= false;|........|
|00002380| 09 09 09 09 09 09 69 66 | 20 28 53 61 76 65 54 65 |......if| (SaveTe|
|00002390| 78 74 46 69 6c 65 28 74 | 68 65 54 45 48 33 32 4b |xtFile(t|heTEH32K|
|000023a0| 2c 26 6d 79 53 46 52 65 | 70 6c 79 29 29 0d 09 09 |,&mySFRe|ply))...|
|000023b0| 09 09 09 09 7b 0d 09 09 | 09 09 09 09 09 63 68 61 |....{...|.....cha|
|000023c0| 6e 67 65 64 20 3d 20 66 | 61 6c 73 65 3b 0d 09 09 |nged = f|alse;...|
|000023d0| 09 09 09 09 09 53 65 74 | 57 54 69 74 6c 65 28 74 |.....Set|WTitle(t|
|000023e0| 68 65 57 50 74 72 2c 6d | 79 53 46 52 65 70 6c 79 |heWPtr,m|ySFReply|
|000023f0| 2e 66 4e 61 6d 65 29 3b | 0d 09 09 09 09 09 09 7d |.fName);|.......}|
|00002400| 0d 09 09 09 09 09 09 65 | 6c 73 65 0d 09 09 09 09 |.......e|lse.....|
|00002410| 09 09 09 6d 79 53 46 52 | 65 70 6c 79 20 3d 20 6f |...mySFR|eply = o|
|00002420| 6c 64 53 46 52 65 70 6c | 79 3b 0d 09 09 09 09 09 |ldSFRepl|y;......|
|00002430| 7d 0d 09 09 09 09 09 09 | 0d 09 09 09 09 09 65 6c |}.......|......el|
|00002440| 73 65 0d 09 09 09 09 09 | 09 53 79 73 42 65 65 70 |se......|.SysBeep|
|00002450| 28 31 29 3b 0d 09 09 09 | 09 09 0d 09 09 09 09 09 |(1);....|........|
|00002460| 62 72 65 61 6b 3b 0d 09 | 09 09 09 0d 09 09 09 09 |break;..|........|
|00002470| 63 61 73 65 20 6d 61 6b | 65 42 69 67 43 6f 6d 6d |case mak|eBigComm|
|00002480| 61 6e 64 3a 0d 09 09 09 | 09 09 43 72 65 61 74 65 |and:....|..Create|
|00002490| 42 69 67 46 69 6c 65 28 | 29 3b 0d 09 09 09 09 09 |BigFile(|);......|
|000024a0| 62 72 65 61 6b 3b 0d 09 | 09 09 09 0d 09 09 09 09 |break;..|........|
|000024b0| 63 61 73 65 20 71 75 69 | 74 43 6f 6d 6d 61 6e 64 |case qui|tCommand|
|000024c0| 3a 0d 09 09 09 09 09 69 | 66 20 28 74 68 65 54 45 |:......i|f (theTE|
|000024d0| 48 33 32 4b 29 0d 09 09 | 09 09 09 7b 0d 09 09 09 |H32K)...|...{....|
|000024e0| 09 09 09 69 66 20 28 44 | 6f 43 6c 6f 73 65 57 69 |...if (D|oCloseWi|
|000024f0| 6e 64 6f 77 28 74 68 65 | 57 50 74 72 29 29 0d 09 |ndow(the|WPtr))..|
|00002500| 09 09 09 09 09 09 61 6c | 69 76 65 20 3d 20 66 61 |......al|ive = fa|
|00002510| 6c 73 65 3b 0d 09 09 09 | 09 09 7d 0d 09 09 09 09 |lse;....|..}.....|
|00002520| 09 65 6c 73 65 0d 09 09 | 09 09 09 09 61 6c 69 76 |.else...|....aliv|
|00002530| 65 20 3d 20 66 61 6c 73 | 65 3b 0d 09 09 09 09 09 |e = fals|e;......|
|00002540| 0d 09 09 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 09 |......br|eak;....|
|00002550| 7d 0d 09 09 09 0d 09 09 | 09 62 72 65 61 6b 3b 0d |}.......|.break;.|
|00002560| 09 09 0d 09 09 63 61 73 | 65 20 65 64 69 74 49 44 |.....cas|e editID|
|00002570| 3a 0d 09 09 09 73 77 69 | 74 63 68 28 74 68 65 49 |:....swi|tch(theI|
|00002580| 74 65 6d 29 0d 09 09 09 | 7b 0d 09 09 09 09 63 61 |tem)....|{.....ca|
|00002590| 73 65 20 63 75 74 43 6f | 6d 6d 61 6e 64 3a 0d 09 |se cutCo|mmand:..|
|000025a0| 09 09 09 09 69 66 20 28 | 21 44 6f 43 75 74 28 29 |....if (|!DoCut()|
|000025b0| 29 0d 09 09 09 09 09 09 | 53 79 73 74 65 6d 45 64 |).......|SystemEd|
|000025c0| 69 74 28 74 68 65 49 74 | 65 6d 20 2d 20 31 29 3b |it(theIt|em - 1);|
|000025d0| 0d 09 09 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 09 |......br|eak;....|
|000025e0| 09 0d 09 09 09 09 63 61 | 73 65 20 63 6f 70 79 43 |......ca|se copyC|
|000025f0| 6f 6d 6d 61 6e 64 3a 0d | 09 09 09 09 09 69 66 20 |ommand:.|.....if |
|00002600| 28 21 44 6f 43 6f 70 79 | 28 29 29 0d 09 09 09 09 |(!DoCopy|()).....|
|00002610| 09 09 53 79 73 74 65 6d | 45 64 69 74 28 74 68 65 |..System|Edit(the|
|00002620| 49 74 65 6d 20 2d 20 31 | 29 3b 0d 09 09 09 09 09 |Item - 1|);......|
|00002630| 62 72 65 61 6b 3b 0d 09 | 09 09 09 0d 09 09 09 09 |break;..|........|
|00002640| 63 61 73 65 20 70 61 73 | 74 65 43 6f 6d 6d 61 6e |case pas|teComman|
|00002650| 64 3a 0d 09 09 09 09 09 | 69 66 20 28 21 44 6f 50 |d:......|if (!DoP|
|00002660| 61 73 74 65 28 29 29 0d | 09 09 09 09 09 09 53 79 |aste()).|......Sy|
|00002670| 73 74 65 6d 45 64 69 74 | 28 74 68 65 49 74 65 6d |stemEdit|(theItem|
|00002680| 20 2d 20 31 29 3b 0d 09 | 09 09 09 09 0d 09 09 09 | - 1);..|........|
|00002690| 09 09 62 72 65 61 6b 3b | 0d 09 09 09 09 0d 09 09 |..break;|........|
|000026a0| 09 09 63 61 73 65 20 63 | 6c 65 61 72 43 6f 6d 6d |..case c|learComm|
|000026b0| 61 6e 64 3a 0d 09 09 09 | 09 09 69 66 20 28 21 44 |and:....|..if (!D|
|000026c0| 6f 43 6c 65 61 72 28 29 | 29 0d 09 09 09 09 09 09 |oClear()|).......|
|000026d0| 53 79 73 74 65 6d 45 64 | 69 74 28 74 68 65 49 74 |SystemEd|it(theIt|
|000026e0| 65 6d 20 2d 20 31 29 3b | 0d 09 09 09 09 09 0d 09 |em - 1);|........|
|000026f0| 09 09 09 09 62 72 65 61 | 6b 3b 0d 09 09 09 09 0d |....brea|k;......|
|00002700| 09 09 09 09 63 61 73 65 | 20 73 65 6c 65 63 74 43 |....case| selectC|
|00002710| 6f 6d 6d 61 6e 64 3a 0d | 09 09 09 09 09 69 66 20 |ommand:.|.....if |
|00002720| 28 21 44 6f 53 65 6c 65 | 63 74 41 6c 6c 28 29 29 |(!DoSele|ctAll())|
|00002730| 0d 09 09 09 09 09 09 53 | 79 73 74 65 6d 45 64 69 |.......S|ystemEdi|
|00002740| 74 28 74 68 65 49 74 65 | 6d 20 2d 20 31 29 3b 0d |t(theIte|m - 1);.|
|00002750| 09 09 09 09 09 0d 09 09 | 09 09 09 62 72 65 61 6b |........|...break|
|00002760| 3b 0d 09 09 09 09 0d 09 | 09 09 09 63 61 73 65 20 |;.......|...case |
|00002770| 77 72 61 70 43 6f 6d 6d | 61 6e 64 3a 0d 09 09 09 |wrapComm|and:....|
|00002780| 09 09 69 66 20 28 74 68 | 65 57 50 74 72 20 26 26 |..if (th|eWPtr &&|
|00002790| 20 74 68 65 57 50 74 72 | 20 3d 3d 20 46 72 6f 6e | theWPtr| == Fron|
|000027a0| 74 57 69 6e 64 6f 77 28 | 29 20 26 26 20 74 68 65 |tWindow(|) && the|
|000027b0| 54 45 48 33 32 4b 29 0d | 09 09 09 09 09 7b 0d 09 |TEH32K).|.....{..|
|000027c0| 09 09 09 09 09 28 2a 2a | 74 68 65 54 45 48 33 32 |.....(**|theTEH32|
|000027d0| 4b 29 2e 63 72 4f 6e 6c | 79 20 3d 20 21 28 2a 2a |K).crOnl|y = !(**|
|000027e0| 74 68 65 54 45 48 33 32 | 4b 29 2e 63 72 4f 6e 6c |theTEH32|K).crOnl|
|000027f0| 79 3b 0d 09 09 09 09 09 | 09 0d 09 09 09 09 09 09 |y;......|........|
|00002800| 54 45 33 32 4b 43 61 6c | 54 65 78 74 28 74 68 65 |TE32KCal|Text(the|
|00002810| 54 45 48 33 32 4b 29 3b | 0d 09 09 09 09 09 09 0d |TEH32K);|........|
|00002820| 09 09 09 09 09 09 74 65 | 6d 70 52 65 63 74 20 3d |......te|mpRect =|
|00002830| 20 74 68 65 57 50 74 72 | 2d 3e 70 6f 72 74 52 65 | theWPtr|->portRe|
|00002840| 63 74 3b 0d 09 09 09 09 | 09 09 47 65 74 50 6f 72 |ct;.....|..GetPor|
|00002850| 74 28 26 6f 6c 64 50 6f | 72 74 29 3b 0d 09 09 09 |t(&oldPo|rt);....|
|00002860| 09 09 09 53 65 74 50 6f | 72 74 28 74 68 65 57 50 |...SetPo|rt(theWP|
|00002870| 74 72 29 3b 0d 09 09 09 | 09 09 09 49 6e 76 61 6c |tr);....|...Inval|
|00002880| 52 65 63 74 28 26 74 65 | 6d 70 52 65 63 74 29 3b |Rect(&te|mpRect);|
|00002890| 0d 09 09 09 09 09 09 53 | 65 74 50 6f 72 74 28 6f |.......S|etPort(o|
|000028a0| 6c 64 50 6f 72 74 29 3b | 0d 09 09 09 09 09 09 0d |ldPort);|........|
|000028b0| 09 09 09 09 09 09 41 64 | 6a 75 73 74 46 6f 72 52 |......Ad|justForR|
|000028c0| 65 73 69 7a 65 64 57 69 | 6e 64 6f 77 28 29 3b 0d |esizedWi|ndow();.|
|000028d0| 09 09 09 09 09 7d 0d 09 | 09 09 09 09 0d 09 09 09 |.....}..|........|
|000028e0| 09 09 62 72 65 61 6b 3b | 0d 09 09 09 09 0d 09 09 |..break;|........|
|000028f0| 09 09 0d 09 09 09 09 64 | 65 66 61 75 6c 74 3a 0d |.......d|efault:.|
|00002900| 09 09 09 09 09 53 79 73 | 74 65 6d 45 64 69 74 28 |.....Sys|temEdit(|
|00002910| 74 68 65 49 74 65 6d 20 | 2d 20 31 29 3b 0d 09 09 |theItem |- 1);...|
|00002920| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 09 7d 0d 09 |...break|;....}..|
|00002930| 09 09 0d 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 09 |......br|eak;....|
|00002940| 0d 09 09 63 61 73 65 20 | 66 6f 6e 74 49 44 3a 0d |...case |fontID:.|
|00002950| 09 09 09 6e 75 6d 49 74 | 65 6d 73 20 3d 20 43 6f |...numIt|ems = Co|
|00002960| 75 6e 74 4d 49 74 65 6d | 73 28 6d 79 4d 65 6e 75 |untMItem|s(myMenu|
|00002970| 73 5b 66 6f 6e 74 4d 65 | 6e 75 5d 29 3b 0d 09 09 |s[fontMe|nu]);...|
|00002980| 09 0d 09 09 09 69 66 20 | 28 74 68 65 49 74 65 6d |.....if |(theItem|
|00002990| 20 3c 3d 20 6e 75 6d 49 | 74 65 6d 73 2d 37 29 0d | <= numI|tems-7).|
|000029a0| 09 09 09 7b 0d 09 09 09 | 09 47 65 74 49 74 65 6d |...{....|.GetItem|
|000029b0| 28 6d 79 4d 65 6e 75 73 | 5b 66 6f 6e 74 4d 65 6e |(myMenus|[fontMen|
|000029c0| 75 5d 2c 20 74 68 65 49 | 74 65 6d 2c 20 28 75 6e |u], theI|tem, (un|
|000029d0| 73 69 67 6e 65 64 20 63 | 68 61 72 20 2a 29 20 74 |signed c|har *) t|
|000029e0| 65 6d 70 53 74 72 69 6e | 67 29 3b 0d 09 09 09 09 |empStrin|g);.....|
|000029f0| 50 32 43 53 74 72 28 28 | 75 6e 73 69 67 6e 65 64 |P2CStr((|unsigned|
|00002a00| 20 63 68 61 72 20 2a 29 | 20 74 65 6d 70 53 74 72 | char *)| tempStr|
|00002a10| 69 6e 67 29 3b 0d 09 09 | 09 09 44 6f 46 6f 6e 74 |ing);...|..DoFont|
|00002a20| 53 69 7a 65 28 74 65 6d | 70 53 74 72 69 6e 67 2c |Size(tem|pString,|
|00002a30| 2d 31 29 3b 0d 09 09 09 | 7d 0d 09 09 09 0d 09 09 |-1);....|}.......|
|00002a40| 09 65 6c 73 65 0d 09 09 | 09 7b 0d 09 09 09 09 47 |.else...|.{.....G|
|00002a50| 65 74 49 74 65 6d 28 6d | 79 4d 65 6e 75 73 5b 66 |etItem(m|yMenus[f|
|00002a60| 6f 6e 74 4d 65 6e 75 5d | 2c 20 74 68 65 49 74 65 |ontMenu]|, theIte|
|00002a70| 6d 2c 20 28 75 6e 73 69 | 67 6e 65 64 20 63 68 61 |m, (unsi|gned cha|
|00002a80| 72 20 2a 29 20 74 65 6d | 70 53 74 72 69 6e 67 29 |r *) tem|pString)|
|00002a90| 3b 0d 09 09 09 09 50 32 | 43 53 74 72 28 28 75 6e |;.....P2|CStr((un|
|00002aa0| 73 69 67 6e 65 64 20 63 | 68 61 72 20 2a 29 20 74 |signed c|har *) t|
|00002ab0| 65 6d 70 53 74 72 69 6e | 67 29 3b 0d 09 09 09 09 |empStrin|g);.....|
|00002ac0| 0d 09 09 09 09 69 66 20 | 28 73 73 63 61 6e 66 28 |.....if |(sscanf(|
|00002ad0| 74 65 6d 70 53 74 72 69 | 6e 67 2c 22 25 64 22 2c |tempStri|ng,"%d",|
|00002ae0| 26 6e 75 6d 49 74 65 6d | 73 29 3d 3d 31 29 0d 09 |&numItem|s)==1)..|
|00002af0| 09 09 09 7b 0d 09 09 09 | 09 09 74 65 6d 70 53 74 |...{....|..tempSt|
|00002b00| 72 69 6e 67 5b 30 5d 20 | 3d 20 30 3b 0d 09 09 09 |ring[0] |= 0;....|
|00002b10| 09 09 44 6f 46 6f 6e 74 | 53 69 7a 65 28 74 65 6d |..DoFont|Size(tem|
|00002b20| 70 53 74 72 69 6e 67 2c | 6e 75 6d 49 74 65 6d 73 |pString,|numItems|
|00002b30| 29 3b 0d 09 09 09 09 7d | 0d 09 09 09 7d 0d 09 09 |);.....}|....}...|
|00002b40| 09 0d 09 09 09 62 72 65 | 61 6b 3b 0d 09 7d 0d 09 |.....bre|ak;..}..|
|00002b50| 0d 09 48 69 6c 69 74 65 | 4d 65 6e 75 28 30 29 3b |..Hilite|Menu(0);|
|00002b60| 0d 7d 0d 0d 0d 0d 0d 4f | 70 65 6e 54 65 78 74 46 |.}.....O|penTextF|
|00002b70| 69 6c 65 28 74 68 65 54 | 45 48 2c 6d 79 53 46 52 |ile(theT|EH,mySFR|
|00002b80| 65 70 6c 79 29 0d 54 45 | 33 32 4b 48 61 6e 64 6c |eply).TE|32KHandl|
|00002b90| 65 09 74 68 65 54 45 48 | 3b 53 46 52 65 70 6c 79 |e.theTEH|;SFReply|
|00002ba0| 09 2a 6d 79 53 46 52 65 | 70 6c 79 3b 0d 7b 0d 53 |.*mySFRe|ply;.{.S|
|00002bb0| 46 54 79 70 65 4c 69 73 | 74 09 6d 79 53 46 54 79 |FTypeLis|t.mySFTy|
|00002bc0| 70 65 73 3b 0d 50 6f 69 | 6e 74 09 09 74 68 65 54 |pes;.Poi|nt..theT|
|00002bd0| 6f 70 4c 65 66 74 3b 0d | 73 68 6f 72 74 09 09 09 |opLeft;.|short...|
|00002be0| 65 72 72 43 6f 64 65 2c | 66 52 65 66 4e 75 6d 3b |errCode,|fRefNum;|
|00002bf0| 0d 6c 6f 6e 67 09 09 62 | 79 74 65 43 6f 75 6e 74 |.long..b|yteCount|
|00002c00| 3b 0d 50 74 72 09 09 09 | 74 68 65 54 65 78 74 3b |;.Ptr...|theText;|
|00002c10| 0d 0d 0d 09 69 66 20 28 | 74 68 65 54 45 48 29 0d |....if (|theTEH).|
|00002c20| 09 7b 0d 09 09 74 68 65 | 54 6f 70 4c 65 66 74 2e |.{...the|TopLeft.|
|00002c30| 68 20 3d 20 71 64 2e 73 | 63 72 65 65 6e 42 69 74 |h = qd.s|creenBit|
|00002c40| 73 2e 62 6f 75 6e 64 73 | 2e 6c 65 66 74 20 2b 20 |s.bounds|.left + |
|00002c50| 28 71 64 2e 73 63 72 65 | 65 6e 42 69 74 73 2e 62 |(qd.scre|enBits.b|
|00002c60| 6f 75 6e 64 73 2e 72 69 | 67 68 74 20 2d 20 71 64 |ounds.ri|ght - qd|
|00002c70| 2e 73 63 72 65 65 6e 42 | 69 74 73 2e 62 6f 75 6e |.screenB|its.boun|
|00002c80| 64 73 2e 6c 65 66 74 20 | 2d 20 33 34 38 29 2f 32 |ds.left |- 348)/2|
|00002c90| 3b 3b 0d 09 09 74 68 65 | 54 6f 70 4c 65 66 74 2e |;;...the|TopLeft.|
|00002ca0| 76 20 3d 20 71 64 2e 73 | 63 72 65 65 6e 42 69 74 |v = qd.s|creenBit|
|00002cb0| 73 2e 62 6f 75 6e 64 73 | 2e 74 6f 70 20 2b 20 35 |s.bounds|.top + 5|
|00002cc0| 30 3b 0d 09 09 0d 09 09 | 6d 79 53 46 54 79 70 65 |0;......|mySFType|
|00002cd0| 73 5b 30 5d 20 3d 20 27 | 54 45 58 54 27 3b 0d 09 |s[0] = '|TEXT';..|
|00002ce0| 09 0d 09 09 49 6e 69 74 | 43 75 72 73 6f 72 28 29 |....Init|Cursor()|
|00002cf0| 3b 0d 09 09 0d 09 09 53 | 46 47 65 74 46 69 6c 65 |;......S|FGetFile|
|00002d00| 28 74 68 65 54 6f 70 4c | 65 66 74 2c 22 5c 70 53 |(theTopL|eft,"\pS|
|00002d10| 65 6c 65 63 74 20 54 65 | 78 74 20 46 69 6c 65 20 |elect Te|xt File |
|00002d20| 54 6f 20 4f 70 65 6e 3a | 22 2c 30 4c 2c 31 2c 6d |To Open:|",0L,1,m|
|00002d30| 79 53 46 54 79 70 65 73 | 2c 30 4c 2c 6d 79 53 46 |ySFTypes|,0L,mySF|
|00002d40| 52 65 70 6c 79 29 3b 0d | 09 09 0d 09 09 69 66 20 |Reply);.|.....if |
|00002d50| 28 6d 79 53 46 52 65 70 | 6c 79 2d 3e 67 6f 6f 64 |(mySFRep|ly->good|
|00002d60| 29 0d 09 09 7b 0d 09 09 | 09 69 66 20 28 28 65 72 |)...{...|.if ((er|
|00002d70| 72 43 6f 64 65 20 3d 20 | 46 53 4f 70 65 6e 28 6d |rCode = |FSOpen(m|
|00002d80| 79 53 46 52 65 70 6c 79 | 2d 3e 66 4e 61 6d 65 2c |ySFReply|->fName,|
|00002d90| 6d 79 53 46 52 65 70 6c | 79 2d 3e 76 52 65 66 4e |mySFRepl|y->vRefN|
|00002da0| 75 6d 2c 26 66 52 65 66 | 4e 75 6d 29 29 21 3d 6e |um,&fRef|Num))!=n|
|00002db0| 6f 45 72 72 29 0d 09 09 | 09 7b 0d 09 09 09 09 6d |oErr)...|.{.....m|
|00002dc0| 79 53 46 52 65 70 6c 79 | 2d 3e 67 6f 6f 64 20 3d |ySFReply|->good =|
|00002dd0| 20 66 61 6c 73 65 3b 0d | 09 09 09 09 50 32 43 53 | false;.|....P2CS|
|00002de0| 74 72 28 28 75 6e 73 69 | 67 6e 65 64 20 63 68 61 |tr((unsi|gned cha|
|00002df0| 72 20 2a 29 20 6d 79 53 | 46 52 65 70 6c 79 2d 3e |r *) myS|FReply->|
|00002e00| 66 4e 61 6d 65 29 3b 0d | 09 09 09 09 73 70 72 69 |fName);.|....spri|
|00002e10| 6e 74 66 28 74 65 6d 70 | 53 74 72 69 6e 67 2c 22 |ntf(temp|String,"|
|00002e20| 4f 70 65 6e 54 65 78 74 | 46 69 6c 65 3a 20 46 53 |OpenText|File: FS|
|00002e30| 4f 70 65 6e 28 27 25 73 | 27 29 20 45 72 72 6f 72 |Open('%s|') Error|
|00002e40| 20 25 64 22 2c 6d 79 53 | 46 52 65 70 6c 79 2d 3e | %d",myS|FReply->|
|00002e50| 66 4e 61 6d 65 2c 65 72 | 72 43 6f 64 65 29 3b 0d |fName,er|rCode);.|
|00002e60| 09 09 09 09 45 72 72 6f | 72 41 6c 65 72 74 28 74 |....Erro|rAlert(t|
|00002e70| 65 6d 70 53 74 72 69 6e | 67 29 3b 0d 09 09 09 09 |empStrin|g);.....|
|00002e80| 72 65 74 75 72 6e 28 66 | 61 6c 73 65 29 3b 0d 09 |return(f|alse);..|
|00002e90| 09 09 7d 0d 09 09 09 0d | 09 09 09 69 66 20 28 28 |..}.....|...if ((|
|00002ea0| 65 72 72 43 6f 64 65 20 | 3d 20 47 65 74 45 4f 46 |errCode |= GetEOF|
|00002eb0| 28 66 52 65 66 4e 75 6d | 2c 26 62 79 74 65 43 6f |(fRefNum|,&byteCo|
|00002ec0| 75 6e 74 29 29 21 3d 6e | 6f 45 72 72 29 0d 09 09 |unt))!=n|oErr)...|
|00002ed0| 09 7b 0d 09 09 09 09 6d | 79 53 46 52 65 70 6c 79 |.{.....m|ySFReply|
|00002ee0| 2d 3e 67 6f 6f 64 20 3d | 20 66 61 6c 73 65 3b 0d |->good =| false;.|
|00002ef0| 09 09 09 09 46 53 43 6c | 6f 73 65 28 66 52 65 66 |....FSCl|ose(fRef|
|00002f00| 4e 75 6d 29 3b 0d 09 09 | 09 09 50 32 43 53 74 72 |Num);...|..P2CStr|
|00002f10| 28 28 75 6e 73 69 67 6e | 65 64 20 63 68 61 72 20 |((unsign|ed char |
|00002f20| 2a 29 20 6d 79 53 46 52 | 65 70 6c 79 2d 3e 66 4e |*) mySFR|eply->fN|
|00002f30| 61 6d 65 29 3b 0d 09 09 | 09 09 73 70 72 69 6e 74 |ame);...|..sprint|
|00002f40| 66 28 74 65 6d 70 53 74 | 72 69 6e 67 2c 22 4f 70 |f(tempSt|ring,"Op|
|00002f50| 65 6e 54 65 78 74 46 69 | 6c 65 3a 20 47 65 74 45 |enTextFi|le: GetE|
|00002f60| 4f 46 28 27 25 73 27 2c | 30 29 20 45 72 72 6f 72 |OF('%s',|0) Error|
|00002f70| 20 25 64 22 2c 6d 79 53 | 46 52 65 70 6c 79 2d 3e | %d",myS|FReply->|
|00002f80| 66 4e 61 6d 65 2c 65 72 | 72 43 6f 64 65 29 3b 0d |fName,er|rCode);.|
|00002f90| 09 09 09 09 45 72 72 6f | 72 41 6c 65 72 74 28 74 |....Erro|rAlert(t|
|00002fa0| 65 6d 70 53 74 72 69 6e | 67 29 3b 0d 09 09 09 09 |empStrin|g);.....|
|00002fb0| 72 65 74 75 72 6e 28 66 | 61 6c 73 65 29 3b 0d 09 |return(f|alse);..|
|00002fc0| 09 09 7d 0d 09 09 09 0d | 09 09 09 69 66 20 28 28 |..}.....|...if ((|
|00002fd0| 65 72 72 43 6f 64 65 20 | 3d 20 53 65 74 46 50 6f |errCode |= SetFPo|
|00002fe0| 73 28 66 52 65 66 4e 75 | 6d 2c 66 73 46 72 6f 6d |s(fRefNu|m,fsFrom|
|00002ff0| 53 74 61 72 74 2c 30 4c | 29 29 21 3d 6e 6f 45 72 |Start,0L|))!=noEr|
|00003000| 72 29 0d 09 09 09 7b 0d | 09 09 09 09 6d 79 53 46 |r)....{.|....mySF|
|00003010| 52 65 70 6c 79 2d 3e 67 | 6f 6f 64 20 3d 20 66 61 |Reply->g|ood = fa|
|00003020| 6c 73 65 3b 0d 09 09 09 | 09 46 53 43 6c 6f 73 65 |lse;....|.FSClose|
|00003030| 28 66 52 65 66 4e 75 6d | 29 3b 0d 09 09 09 09 50 |(fRefNum|);.....P|
|00003040| 32 43 53 74 72 28 28 75 | 6e 73 69 67 6e 65 64 20 |2CStr((u|nsigned |
|00003050| 63 68 61 72 20 2a 29 20 | 6d 79 53 46 52 65 70 6c |char *) |mySFRepl|
|00003060| 79 2d 3e 66 4e 61 6d 65 | 29 3b 0d 09 09 09 09 73 |y->fName|);.....s|
|00003070| 70 72 69 6e 74 66 28 74 | 65 6d 70 53 74 72 69 6e |printf(t|empStrin|
|00003080| 67 2c 22 4f 70 65 6e 54 | 65 78 74 46 69 6c 65 3a |g,"OpenT|extFile:|
|00003090| 20 53 65 74 46 50 6f 73 | 28 27 25 73 27 2c 30 29 | SetFPos|('%s',0)|
|000030a0| 20 45 72 72 6f 72 20 25 | 64 22 2c 6d 79 53 46 52 | Error %|d",mySFR|
|000030b0| 65 70 6c 79 2d 3e 66 4e | 61 6d 65 2c 65 72 72 43 |eply->fN|ame,errC|
|000030c0| 6f 64 65 29 3b 0d 09 09 | 09 09 45 72 72 6f 72 41 |ode);...|..ErrorA|
|000030d0| 6c 65 72 74 28 74 65 6d | 70 53 74 72 69 6e 67 29 |lert(tem|pString)|
|000030e0| 3b 0d 09 09 09 09 72 65 | 74 75 72 6e 28 66 61 6c |;.....re|turn(fal|
|000030f0| 73 65 29 3b 0d 09 09 09 | 7d 0d 09 09 09 0d 09 09 |se);....|}.......|
|00003100| 09 74 68 65 54 65 78 74 | 20 3d 20 4e 65 77 50 74 |.theText| = NewPt|
|00003110| 72 28 62 79 74 65 43 6f | 75 6e 74 29 3b 0d 09 09 |r(byteCo|unt);...|
|00003120| 09 0d 09 09 09 69 66 20 | 28 4d 65 6d 45 72 72 6f |.....if |(MemErro|
|00003130| 72 28 29 29 0d 09 09 09 | 7b 0d 09 09 09 09 6d 79 |r())....|{.....my|
|00003140| 53 46 52 65 70 6c 79 2d | 3e 67 6f 6f 64 20 3d 20 |SFReply-|>good = |
|00003150| 66 61 6c 73 65 3b 0d 09 | 09 09 09 46 53 43 6c 6f |false;..|...FSClo|
|00003160| 73 65 28 66 52 65 66 4e | 75 6d 29 3b 0d 09 09 09 |se(fRefN|um);....|
|00003170| 09 73 70 72 69 6e 74 66 | 28 74 65 6d 70 53 74 72 |.sprintf|(tempStr|
|00003180| 69 6e 67 2c 22 4f 70 65 | 6e 54 65 78 74 46 69 6c |ing,"Ope|nTextFil|
|00003190| 65 3a 20 4e 65 77 50 74 | 72 28 25 6c 64 29 20 45 |e: NewPt|r(%ld) E|
|000031a0| 72 72 6f 72 20 25 64 22 | 2c 62 79 74 65 43 6f 75 |rror %d"|,byteCou|
|000031b0| 6e 74 2c 4d 65 6d 45 72 | 72 6f 72 28 29 29 3b 0d |nt,MemEr|ror());.|
|000031c0| 09 09 09 09 45 72 72 6f | 72 41 6c 65 72 74 28 74 |....Erro|rAlert(t|
|000031d0| 65 6d 70 53 74 72 69 6e | 67 29 3b 0d 09 09 09 09 |empStrin|g);.....|
|000031e0| 72 65 74 75 72 6e 28 66 | 61 6c 73 65 29 3b 0d 09 |return(f|alse);..|
|000031f0| 09 09 7d 0d 09 09 09 0d | 09 09 09 53 65 74 43 75 |..}.....|...SetCu|
|00003200| 72 73 6f 72 28 26 77 61 | 69 74 43 75 72 73 6f 72 |rsor(&wa|itCursor|
|00003210| 29 3b 0d 09 09 09 0d 09 | 09 09 69 66 20 28 28 65 |);......|..if ((e|
|00003220| 72 72 43 6f 64 65 20 3d | 20 46 53 52 65 61 64 28 |rrCode =| FSRead(|
|00003230| 66 52 65 66 4e 75 6d 2c | 26 62 79 74 65 43 6f 75 |fRefNum,|&byteCou|
|00003240| 6e 74 2c 74 68 65 54 65 | 78 74 29 29 21 3d 6e 6f |nt,theTe|xt))!=no|
|00003250| 45 72 72 29 0d 09 09 09 | 7b 0d 09 09 09 09 49 6e |Err)....|{.....In|
|00003260| 69 74 43 75 72 73 6f 72 | 28 29 3b 0d 09 09 09 09 |itCursor|();.....|
|00003270| 6d 79 53 46 52 65 70 6c | 79 2d 3e 67 6f 6f 64 20 |mySFRepl|y->good |
|00003280| 3d 20 66 61 6c 73 65 3b | 0d 09 09 09 09 44 69 73 |= false;|.....Dis|
|00003290| 70 6f 73 65 50 74 72 28 | 74 68 65 54 65 78 74 29 |posePtr(|theText)|
|000032a0| 3b 0d 09 09 09 09 46 53 | 43 6c 6f 73 65 28 66 52 |;.....FS|Close(fR|
|000032b0| 65 66 4e 75 6d 29 3b 0d | 09 09 09 09 50 32 43 53 |efNum);.|....P2CS|
|000032c0| 74 72 28 28 75 6e 73 69 | 67 6e 65 64 20 63 68 61 |tr((unsi|gned cha|
|000032d0| 72 20 2a 29 20 6d 79 53 | 46 52 65 70 6c 79 2d 3e |r *) myS|FReply->|
|000032e0| 66 4e 61 6d 65 29 3b 0d | 09 09 09 09 73 70 72 69 |fName);.|....spri|
|000032f0| 6e 74 66 28 74 65 6d 70 | 53 74 72 69 6e 67 2c 22 |ntf(temp|String,"|
|00003300| 4f 70 65 6e 54 65 78 74 | 46 69 6c 65 3a 20 46 53 |OpenText|File: FS|
|00003310| 52 65 61 64 28 27 25 73 | 27 29 20 45 72 72 6f 72 |Read('%s|') Error|
|00003320| 20 25 64 22 2c 6d 79 53 | 46 52 65 70 6c 79 2d 3e | %d",myS|FReply->|
|00003330| 66 4e 61 6d 65 2c 65 72 | 72 43 6f 64 65 29 3b 0d |fName,er|rCode);.|
|00003340| 09 09 09 09 45 72 72 6f | 72 41 6c 65 72 74 28 74 |....Erro|rAlert(t|
|00003350| 65 6d 70 53 74 72 69 6e | 67 29 3b 0d 09 09 09 09 |empStrin|g);.....|
|00003360| 72 65 74 75 72 6e 28 66 | 61 6c 73 65 29 3b 0d 09 |return(f|alse);..|
|00003370| 09 09 7d 0d 09 09 09 0d | 09 09 09 69 66 20 28 28 |..}.....|...if ((|
|00003380| 65 72 72 43 6f 64 65 20 | 3d 20 46 53 43 6c 6f 73 |errCode |= FSClos|
|00003390| 65 28 66 52 65 66 4e 75 | 6d 29 29 21 3d 6e 6f 45 |e(fRefNu|m))!=noE|
|000033a0| 72 72 29 0d 09 09 09 7b | 0d 09 09 09 09 49 6e 69 |rr)....{|.....Ini|
|000033b0| 74 43 75 72 73 6f 72 28 | 29 3b 0d 09 09 09 09 6d |tCursor(|);.....m|
|000033c0| 79 53 46 52 65 70 6c 79 | 2d 3e 67 6f 6f 64 20 3d |ySFReply|->good =|
|000033d0| 20 66 61 6c 73 65 3b 0d | 09 09 09 09 44 69 73 70 | false;.|....Disp|
|000033e0| 6f 73 65 50 74 72 28 74 | 68 65 54 65 78 74 29 3b |osePtr(t|heText);|
|000033f0| 0d 09 09 09 09 50 32 43 | 53 74 72 28 28 75 6e 73 |.....P2C|Str((uns|
|00003400| 69 67 6e 65 64 20 63 68 | 61 72 20 2a 29 20 6d 79 |igned ch|ar *) my|
|00003410| 53 46 52 65 70 6c 79 2d | 3e 66 4e 61 6d 65 29 3b |SFReply-|>fName);|
|00003420| 0d 09 09 09 09 73 70 72 | 69 6e 74 66 28 74 65 6d |.....spr|intf(tem|
|00003430| 70 53 74 72 69 6e 67 2c | 22 4f 70 65 6e 54 65 78 |pString,|"OpenTex|
|00003440| 74 46 69 6c 65 3a 20 46 | 53 43 6c 6f 73 65 28 27 |tFile: F|SClose('|
|00003450| 25 73 27 2c 30 29 20 45 | 72 72 6f 72 20 25 64 22 |%s',0) E|rror %d"|
|00003460| 2c 6d 79 53 46 52 65 70 | 6c 79 2d 3e 66 4e 61 6d |,mySFRep|ly->fNam|
|00003470| 65 2c 65 72 72 43 6f 64 | 65 29 3b 0d 09 09 09 09 |e,errCod|e);.....|
|00003480| 45 72 72 6f 72 41 6c 65 | 72 74 28 74 65 6d 70 53 |ErrorAle|rt(tempS|
|00003490| 74 72 69 6e 67 29 3b 0d | 09 09 09 09 72 65 74 75 |tring);.|....retu|
|000034a0| 72 6e 28 66 61 6c 73 65 | 29 3b 0d 09 09 09 7d 0d |rn(false|);....}.|
|000034b0| 09 09 09 0d 09 09 09 54 | 45 33 32 4b 53 65 74 54 |.......T|E32KSetT|
|000034c0| 65 78 74 28 74 68 65 54 | 65 78 74 2c 62 79 74 65 |ext(theT|ext,byte|
|000034d0| 43 6f 75 6e 74 2c 74 68 | 65 54 45 48 29 3b 0d 09 |Count,th|eTEH);..|
|000034e0| 09 09 0d 09 09 09 44 69 | 73 70 6f 73 65 50 74 72 |......Di|sposePtr|
|000034f0| 28 74 68 65 54 65 78 74 | 29 3b 0d 09 09 09 0d 09 |(theText|);......|
|00003500| 09 09 49 6e 69 74 43 75 | 72 73 6f 72 28 29 3b 0d |..InitCu|rsor();.|
|00003510| 09 09 09 0d 09 09 09 72 | 65 74 75 72 6e 28 74 72 |.......r|eturn(tr|
|00003520| 75 65 29 3b 0d 09 09 7d | 0d 09 09 0d 09 09 65 6c |ue);...}|......el|
|00003530| 73 65 0d 09 09 09 72 65 | 74 75 72 6e 28 66 61 6c |se....re|turn(fal|
|00003540| 73 65 29 3b 0d 09 7d 0d | 09 0d 09 65 6c 73 65 0d |se);..}.|...else.|
|00003550| 09 09 72 65 74 75 72 6e | 28 66 61 6c 73 65 29 3b |..return|(false);|
|00003560| 0d 7d 0d 0d 0d 0d 53 61 | 76 65 54 65 78 74 46 69 |.}....Sa|veTextFi|
|00003570| 6c 65 28 74 68 65 54 45 | 48 2c 6d 79 53 46 52 65 |le(theTE|H,mySFRe|
|00003580| 70 6c 79 29 0d 54 45 33 | 32 4b 48 61 6e 64 6c 65 |ply).TE3|2KHandle|
|00003590| 09 74 68 65 54 45 48 3b | 53 46 52 65 70 6c 79 09 |.theTEH;|SFReply.|
|000035a0| 2a 6d 79 53 46 52 65 70 | 6c 79 3b 0d 7b 0d 50 6f |*mySFRep|ly;.{.Po|
|000035b0| 69 6e 74 09 09 74 68 65 | 54 6f 70 4c 65 66 74 3b |int..the|TopLeft;|
|000035c0| 0d 73 68 6f 72 74 09 09 | 09 65 72 72 43 6f 64 65 |.short..|.errCode|
|000035d0| 2c 66 52 65 66 4e 75 6d | 3b 0d 6c 6f 6e 67 09 09 |,fRefNum|;.long..|
|000035e0| 62 79 74 65 43 6f 75 6e | 74 3b 0d 48 61 6e 64 6c |byteCoun|t;.Handl|
|000035f0| 65 09 09 74 68 65 54 65 | 78 74 3b 0d 0d 09 69 66 |e..theTe|xt;...if|
|00003600| 20 28 74 68 65 54 45 48 | 29 0d 09 7b 0d 09 09 74 | (theTEH|)..{...t|
|00003610| 68 65 54 6f 70 4c 65 66 | 74 2e 68 20 3d 20 71 64 |heTopLef|t.h = qd|
|00003620| 2e 73 63 72 65 65 6e 42 | 69 74 73 2e 62 6f 75 6e |.screenB|its.boun|
|00003630| 64 73 2e 6c 65 66 74 20 | 2b 20 28 71 64 2e 73 63 |ds.left |+ (qd.sc|
|00003640| 72 65 65 6e 42 69 74 73 | 2e 62 6f 75 6e 64 73 2e |reenBits|.bounds.|
|00003650| 72 69 67 68 74 20 2d 20 | 71 64 2e 73 63 72 65 65 |right - |qd.scree|
|00003660| 6e 42 69 74 73 2e 62 6f | 75 6e 64 73 2e 6c 65 66 |nBits.bo|unds.lef|
|00003670| 74 20 2d 20 33 30 34 29 | 2f 32 3b 3b 0d 09 09 74 |t - 304)|/2;;...t|
|00003680| 68 65 54 6f 70 4c 65 66 | 74 2e 76 20 3d 20 71 64 |heTopLef|t.v = qd|
|00003690| 2e 73 63 72 65 65 6e 42 | 69 74 73 2e 62 6f 75 6e |.screenB|its.boun|
|000036a0| 64 73 2e 74 6f 70 20 2b | 20 35 30 3b 0d 09 09 0d |ds.top +| 50;....|
|000036b0| 09 09 49 6e 69 74 43 75 | 72 73 6f 72 28 29 3b 0d |..InitCu|rsor();.|
|000036c0| 09 09 0d 09 09 69 66 20 | 28 21 28 6d 79 53 46 52 |.....if |(!(mySFR|
|000036d0| 65 70 6c 79 2d 3e 67 6f | 6f 64 29 29 0d 09 09 09 |eply->go|od))....|
|000036e0| 53 46 50 75 74 46 69 6c | 65 28 74 68 65 54 6f 70 |SFPutFil|e(theTop|
|000036f0| 4c 65 66 74 2c 22 5c 70 | 53 61 76 65 20 54 65 78 |Left,"\p|Save Tex|
|00003700| 74 20 46 69 6c 65 20 41 | 73 3a 22 2c 22 5c 70 22 |t File A|s:","\p"|
|00003710| 2c 30 4c 2c 6d 79 53 46 | 52 65 70 6c 79 29 3b 0d |,0L,mySF|Reply);.|
|00003720| 09 09 0d 09 09 69 66 20 | 28 6d 79 53 46 52 65 70 |.....if |(mySFRep|
|00003730| 6c 79 2d 3e 67 6f 6f 64 | 29 0d 09 09 7b 0d 09 09 |ly->good|)...{...|
|00003740| 09 69 66 20 28 28 65 72 | 72 43 6f 64 65 20 3d 20 |.if ((er|rCode = |
|00003750| 46 53 4f 70 65 6e 28 6d | 79 53 46 52 65 70 6c 79 |FSOpen(m|ySFReply|
|00003760| 2d 3e 66 4e 61 6d 65 2c | 6d 79 53 46 52 65 70 6c |->fName,|mySFRepl|
|00003770| 79 2d 3e 76 52 65 66 4e | 75 6d 2c 26 66 52 65 66 |y->vRefN|um,&fRef|
|00003780| 4e 75 6d 29 29 21 3d 6e | 6f 45 72 72 29 0d 09 09 |Num))!=n|oErr)...|
|00003790| 09 7b 0d 09 09 09 09 69 | 66 20 28 65 72 72 43 6f |.{.....i|f (errCo|
|000037a0| 64 65 3d 3d 66 6e 66 45 | 72 72 29 0d 09 09 09 09 |de==fnfE|rr).....|
|000037b0| 7b 0d 09 09 09 09 09 69 | 66 20 28 28 65 72 72 43 |{......i|f ((errC|
|000037c0| 6f 64 65 20 3d 20 43 72 | 65 61 74 65 28 6d 79 53 |ode = Cr|eate(myS|
|000037d0| 46 52 65 70 6c 79 2d 3e | 66 4e 61 6d 65 2c 6d 79 |FReply->|fName,my|
|000037e0| 53 46 52 65 70 6c 79 2d | 3e 76 52 65 66 4e 75 6d |SFReply-|>vRefNum|
|000037f0| 2c 0d 09 09 09 09 09 09 | 09 09 09 09 09 27 20 20 |,.......|.....'  |
|00003800| 20 20 27 2c 27 54 45 58 | 54 27 29 29 20 21 3d 20 |  ','TEX|T')) != |
|00003810| 6e 6f 45 72 72 29 0d 09 | 09 09 09 09 7b 0d 09 09 |noErr)..|....{...|
|00003820| 09 09 09 09 6d 79 53 46 | 52 65 70 6c 79 2d 3e 67 |....mySF|Reply->g|
|00003830| 6f 6f 64 20 3d 20 66 61 | 6c 73 65 3b 0d 09 09 09 |ood = fa|lse;....|
|00003840| 09 09 09 50 32 43 53 74 | 72 28 28 75 6e 73 69 67 |...P2CSt|r((unsig|
|00003850| 6e 65 64 20 63 68 61 72 | 20 2a 29 20 6d 79 53 46 |ned char| *) mySF|
|00003860| 52 65 70 6c 79 2d 3e 66 | 4e 61 6d 65 29 3b 0d 09 |Reply->f|Name);..|
|00003870| 09 09 09 09 09 73 70 72 | 69 6e 74 66 28 74 65 6d |.....spr|intf(tem|
|00003880| 70 53 74 72 69 6e 67 2c | 22 53 61 76 65 54 65 78 |pString,|"SaveTex|
|00003890| 74 46 69 6c 65 3a 20 43 | 72 65 61 74 65 28 27 25 |tFile: C|reate('%|
|000038a0| 73 27 29 20 45 72 72 6f | 72 20 25 64 22 2c 6d 79 |s') Erro|r %d",my|
|000038b0| 53 46 52 65 70 6c 79 2d | 3e 66 4e 61 6d 65 2c 65 |SFReply-|>fName,e|
|000038c0| 72 72 43 6f 64 65 29 3b | 0d 09 09 09 09 09 09 45 |rrCode);|.......E|
|000038d0| 72 72 6f 72 41 6c 65 72 | 74 28 74 65 6d 70 53 74 |rrorAler|t(tempSt|
|000038e0| 72 69 6e 67 29 3b 0d 09 | 09 09 09 09 09 72 65 74 |ring);..|.....ret|
|000038f0| 75 72 6e 28 66 61 6c 73 | 65 29 3b 0d 09 09 09 09 |urn(fals|e);.....|
|00003900| 09 7d 0d 09 09 09 09 09 | 0d 09 09 09 09 09 65 72 |.}......|......er|
|00003910| 72 43 6f 64 65 20 3d 20 | 46 53 4f 70 65 6e 28 6d |rCode = |FSOpen(m|
|00003920| 79 53 46 52 65 70 6c 79 | 2d 3e 66 4e 61 6d 65 2c |ySFReply|->fName,|
|00003930| 6d 79 53 46 52 65 70 6c | 79 2d 3e 76 52 65 66 4e |mySFRepl|y->vRefN|
|00003940| 75 6d 2c 26 66 52 65 66 | 4e 75 6d 29 3b 0d 09 09 |um,&fRef|Num);...|
|00003950| 09 09 7d 0d 09 09 09 09 | 0d 09 09 09 09 69 66 20 |..}.....|.....if |
|00003960| 28 65 72 72 43 6f 64 65 | 20 21 3d 20 6e 6f 45 72 |(errCode| != noEr|
|00003970| 72 29 0d 09 09 09 09 7b | 0d 09 09 09 09 09 6d 79 |r).....{|......my|
|00003980| 53 46 52 65 70 6c 79 2d | 3e 67 6f 6f 64 20 3d 20 |SFReply-|>good = |
|00003990| 66 61 6c 73 65 3b 0d 09 | 09 09 09 09 50 32 43 53 |false;..|....P2CS|
|000039a0| 74 72 28 28 75 6e 73 69 | 67 6e 65 64 20 63 68 61 |tr((unsi|gned cha|
|000039b0| 72 20 2a 29 20 6d 79 53 | 46 52 65 70 6c 79 2d 3e |r *) myS|FReply->|
|000039c0| 66 4e 61 6d 65 29 3b 0d | 09 09 09 09 09 73 70 72 |fName);.|.....spr|
|000039d0| 69 6e 74 66 28 74 65 6d | 70 53 74 72 69 6e 67 2c |intf(tem|pString,|
|000039e0| 22 53 61 76 65 54 65 78 | 74 46 69 6c 65 3a 20 46 |"SaveTex|tFile: F|
|000039f0| 53 4f 70 65 6e 28 27 25 | 73 27 29 20 45 72 72 6f |SOpen('%|s') Erro|
|00003a00| 72 20 25 64 22 2c 6d 79 | 53 46 52 65 70 6c 79 2d |r %d",my|SFReply-|
|00003a10| 3e 66 4e 61 6d 65 2c 65 | 72 72 43 6f 64 65 29 3b |>fName,e|rrCode);|
|00003a20| 0d 09 09 09 09 09 45 72 | 72 6f 72 41 6c 65 72 74 |......Er|rorAlert|
|00003a30| 28 74 65 6d 70 53 74 72 | 69 6e 67 29 3b 0d 09 09 |(tempStr|ing);...|
|00003a40| 09 09 09 72 65 74 75 72 | 6e 28 66 61 6c 73 65 29 |...retur|n(false)|
|00003a50| 3b 0d 09 09 09 09 7d 0d | 09 09 09 7d 0d 09 09 09 |;.....}.|...}....|
|00003a60| 0d 09 09 09 69 66 20 28 | 28 65 72 72 43 6f 64 65 |....if (|(errCode|
|00003a70| 20 3d 20 53 65 74 45 4f | 46 28 66 52 65 66 4e 75 | = SetEO|F(fRefNu|
|00003a80| 6d 2c 30 4c 29 29 21 3d | 6e 6f 45 72 72 29 0d 09 |m,0L))!=|noErr)..|
|00003a90| 09 09 7b 0d 09 09 09 09 | 6d 79 53 46 52 65 70 6c |..{.....|mySFRepl|
|00003aa0| 79 2d 3e 67 6f 6f 64 20 | 3d 20 66 61 6c 73 65 3b |y->good |= false;|
|00003ab0| 0d 09 09 09 09 46 53 43 | 6c 6f 73 65 28 66 52 65 |.....FSC|lose(fRe|
|00003ac0| 66 4e 75 6d 29 3b 0d 09 | 09 09 09 50 32 43 53 74 |fNum);..|...P2CSt|
|00003ad0| 72 28 28 75 6e 73 69 67 | 6e 65 64 20 63 68 61 72 |r((unsig|ned char|
|00003ae0| 20 2a 29 20 6d 79 53 46 | 52 65 70 6c 79 2d 3e 66 | *) mySF|Reply->f|
|00003af0| 4e 61 6d 65 29 3b 0d 09 | 09 09 09 73 70 72 69 6e |Name);..|...sprin|
|00003b00| 74 66 28 74 65 6d 70 53 | 74 72 69 6e 67 2c 22 53 |tf(tempS|tring,"S|
|00003b10| 61 76 65 54 65 78 74 46 | 69 6c 65 3a 20 53 65 74 |aveTextF|ile: Set|
|00003b20| 45 4f 46 28 27 25 73 27 | 2c 30 29 20 45 72 72 6f |EOF('%s'|,0) Erro|
|00003b30| 72 20 25 64 22 2c 6d 79 | 53 46 52 65 70 6c 79 2d |r %d",my|SFReply-|
|00003b40| 3e 66 4e 61 6d 65 2c 65 | 72 72 43 6f 64 65 29 3b |>fName,e|rrCode);|
|00003b50| 0d 09 09 09 09 45 72 72 | 6f 72 41 6c 65 72 74 28 |.....Err|orAlert(|
|00003b60| 74 65 6d 70 53 74 72 69 | 6e 67 29 3b 0d 09 09 09 |tempStri|ng);....|
|00003b70| 09 72 65 74 75 72 6e 28 | 66 61 6c 73 65 29 3b 0d |.return(|false);.|
|00003b80| 09 09 09 7d 0d 09 09 09 | 0d 09 09 09 69 66 20 28 |...}....|....if (|
|00003b90| 28 65 72 72 43 6f 64 65 | 20 3d 20 53 65 74 46 50 |(errCode| = SetFP|
|00003ba0| 6f 73 28 66 52 65 66 4e | 75 6d 2c 66 73 46 72 6f |os(fRefN|um,fsFro|
|00003bb0| 6d 53 74 61 72 74 2c 30 | 4c 29 29 21 3d 6e 6f 45 |mStart,0|L))!=noE|
|00003bc0| 72 72 29 0d 09 09 09 7b | 0d 09 09 09 09 6d 79 53 |rr)....{|.....myS|
|00003bd0| 46 52 65 70 6c 79 2d 3e | 67 6f 6f 64 20 3d 20 66 |FReply->|good = f|
|00003be0| 61 6c 73 65 3b 0d 09 09 | 09 09 46 53 43 6c 6f 73 |alse;...|..FSClos|
|00003bf0| 65 28 66 52 65 66 4e 75 | 6d 29 3b 0d 09 09 09 09 |e(fRefNu|m);.....|
|00003c00| 50 32 43 53 74 72 28 28 | 75 6e 73 69 67 6e 65 64 |P2CStr((|unsigned|
|00003c10| 20 63 68 61 72 20 2a 29 | 20 6d 79 53 46 52 65 70 | char *)| mySFRep|
|00003c20| 6c 79 2d 3e 66 4e 61 6d | 65 29 3b 0d 09 09 09 09 |ly->fNam|e);.....|
|00003c30| 73 70 72 69 6e 74 66 28 | 74 65 6d 70 53 74 72 69 |sprintf(|tempStri|
|00003c40| 6e 67 2c 22 53 61 76 65 | 54 65 78 74 46 69 6c 65 |ng,"Save|TextFile|
|00003c50| 3a 20 53 65 74 46 50 6f | 73 28 27 25 73 27 2c 30 |: SetFPo|s('%s',0|
|00003c60| 29 20 45 72 72 6f 72 20 | 25 64 22 2c 6d 79 53 46 |) Error |%d",mySF|
|00003c70| 52 65 70 6c 79 2d 3e 66 | 4e 61 6d 65 2c 65 72 72 |Reply->f|Name,err|
|00003c80| 43 6f 64 65 29 3b 0d 09 | 09 09 09 45 72 72 6f 72 |Code);..|...Error|
|00003c90| 41 6c 65 72 74 28 74 65 | 6d 70 53 74 72 69 6e 67 |Alert(te|mpString|
|00003ca0| 29 3b 0d 09 09 09 09 72 | 65 74 75 72 6e 28 66 61 |);.....r|eturn(fa|
|00003cb0| 6c 73 65 29 3b 0d 09 09 | 09 7d 0d 09 09 09 0d 09 |lse);...|.}......|
|00003cc0| 09 09 74 68 65 54 65 78 | 74 20 3d 20 28 2a 2a 74 |..theTex|t = (**t|
|00003cd0| 68 65 54 45 48 29 2e 68 | 54 65 78 74 3b 0d 09 09 |heTEH).h|Text;...|
|00003ce0| 09 62 79 74 65 43 6f 75 | 6e 74 20 3d 20 28 2a 2a |.byteCou|nt = (**|
|00003cf0| 74 68 65 54 45 48 29 2e | 74 65 4c 65 6e 67 74 68 |theTEH).|teLength|
|00003d00| 3b 0d 09 09 09 0d 09 09 | 09 48 4c 6f 63 6b 28 74 |;.......|.HLock(t|
|00003d10| 68 65 54 65 78 74 29 3b | 0d 09 09 09 0d 09 09 09 |heText);|........|
|00003d20| 53 65 74 43 75 72 73 6f | 72 28 26 77 61 69 74 43 |SetCurso|r(&waitC|
|00003d30| 75 72 73 6f 72 29 3b 0d | 09 09 09 0d 09 09 09 69 |ursor);.|.......i|
|00003d40| 66 20 28 28 65 72 72 43 | 6f 64 65 20 3d 20 46 53 |f ((errC|ode = FS|
|00003d50| 57 72 69 74 65 28 66 52 | 65 66 4e 75 6d 2c 26 62 |Write(fR|efNum,&b|
|00003d60| 79 74 65 43 6f 75 6e 74 | 2c 2a 74 68 65 54 65 78 |yteCount|,*theTex|
|00003d70| 74 29 29 21 3d 6e 6f 45 | 72 72 29 0d 09 09 09 7b |t))!=noE|rr)....{|
|00003d80| 0d 09 09 09 09 49 6e 69 | 74 43 75 72 73 6f 72 28 |.....Ini|tCursor(|
|00003d90| 29 3b 0d 09 09 09 09 6d | 79 53 46 52 65 70 6c 79 |);.....m|ySFReply|
|00003da0| 2d 3e 67 6f 6f 64 20 3d | 20 66 61 6c 73 65 3b 0d |->good =| false;.|
|00003db0| 09 09 09 09 48 55 6e 6c | 6f 63 6b 28 74 68 65 54 |....HUnl|ock(theT|
|00003dc0| 65 78 74 29 3b 0d 09 09 | 09 09 46 53 43 6c 6f 73 |ext);...|..FSClos|
|00003dd0| 65 28 66 52 65 66 4e 75 | 6d 29 3b 0d 09 09 09 09 |e(fRefNu|m);.....|
|00003de0| 50 32 43 53 74 72 28 28 | 75 6e 73 69 67 6e 65 64 |P2CStr((|unsigned|
|00003df0| 20 63 68 61 72 20 2a 29 | 20 6d 79 53 46 52 65 70 | char *)| mySFRep|
|00003e00| 6c 79 2d 3e 66 4e 61 6d | 65 29 3b 0d 09 09 09 09 |ly->fNam|e);.....|
|00003e10| 73 70 72 69 6e 74 66 28 | 74 65 6d 70 53 74 72 69 |sprintf(|tempStri|
|00003e20| 6e 67 2c 22 53 61 76 65 | 54 65 78 74 46 69 6c 65 |ng,"Save|TextFile|
|00003e30| 3a 20 46 53 57 72 69 74 | 65 28 27 25 73 27 29 20 |: FSWrit|e('%s') |
|00003e40| 45 72 72 6f 72 20 25 64 | 22 2c 6d 79 53 46 52 65 |Error %d|",mySFRe|
|00003e50| 70 6c 79 2d 3e 66 4e 61 | 6d 65 2c 65 72 72 43 6f |ply->fNa|me,errCo|
|00003e60| 64 65 29 3b 0d 09 09 09 | 09 45 72 72 6f 72 41 6c |de);....|.ErrorAl|
|00003e70| 65 72 74 28 74 65 6d 70 | 53 74 72 69 6e 67 29 3b |ert(temp|String);|
|00003e80| 0d 09 09 09 09 72 65 74 | 75 72 6e 28 66 61 6c 73 |.....ret|urn(fals|
|00003e90| 65 29 3b 0d 09 09 09 7d | 0d 09 09 09 0d 09 09 09 |e);....}|........|
|00003ea0| 48 55 6e 6c 6f 63 6b 28 | 74 68 65 54 65 78 74 29 |HUnlock(|theText)|
|00003eb0| 3b 0d 09 09 09 0d 09 09 | 09 69 66 20 28 28 65 72 |;.......|.if ((er|
|00003ec0| 72 43 6f 64 65 20 3d 20 | 46 53 43 6c 6f 73 65 28 |rCode = |FSClose(|
|00003ed0| 66 52 65 66 4e 75 6d 29 | 29 21 3d 6e 6f 45 72 72 |fRefNum)|)!=noErr|
|00003ee0| 29 0d 09 09 09 7b 0d 09 | 09 09 09 49 6e 69 74 43 |)....{..|...InitC|
|00003ef0| 75 72 73 6f 72 28 29 3b | 0d 09 09 09 09 6d 79 53 |ursor();|.....myS|
|00003f00| 46 52 65 70 6c 79 2d 3e | 67 6f 6f 64 20 3d 20 66 |FReply->|good = f|
|00003f10| 61 6c 73 65 3b 0d 09 09 | 09 09 50 32 43 53 74 72 |alse;...|..P2CStr|
|00003f20| 28 28 75 6e 73 69 67 6e | 65 64 20 63 68 61 72 20 |((unsign|ed char |
|00003f30| 2a 29 20 6d 79 53 46 52 | 65 70 6c 79 2d 3e 66 4e |*) mySFR|eply->fN|
|00003f40| 61 6d 65 29 3b 0d 09 09 | 09 09 73 70 72 69 6e 74 |ame);...|..sprint|
|00003f50| 66 28 74 65 6d 70 53 74 | 72 69 6e 67 2c 22 53 61 |f(tempSt|ring,"Sa|
|00003f60| 76 65 54 65 78 74 46 69 | 6c 65 3a 20 46 53 43 6c |veTextFi|le: FSCl|
|00003f70| 6f 73 65 28 27 25 73 27 | 2c 30 29 20 45 72 72 6f |ose('%s'|,0) Erro|
|00003f80| 72 20 25 64 22 2c 6d 79 | 53 46 52 65 70 6c 79 2d |r %d",my|SFReply-|
|00003f90| 3e 66 4e 61 6d 65 2c 65 | 72 72 43 6f 64 65 29 3b |>fName,e|rrCode);|
|00003fa0| 0d 09 09 09 09 45 72 72 | 6f 72 41 6c 65 72 74 28 |.....Err|orAlert(|
|00003fb0| 74 65 6d 70 53 74 72 69 | 6e 67 29 3b 0d 09 09 09 |tempStri|ng);....|
|00003fc0| 09 72 65 74 75 72 6e 28 | 66 61 6c 73 65 29 3b 0d |.return(|false);.|
|00003fd0| 09 09 09 7d 0d 09 09 09 | 0d 09 09 09 46 6c 75 73 |...}....|....Flus|
|00003fe0| 68 56 6f 6c 28 22 5c 70 | 22 2c 6d 79 53 46 52 65 |hVol("\p|",mySFRe|
|00003ff0| 70 6c 79 2d 3e 76 52 65 | 66 4e 75 6d 29 3b 0d 09 |ply->vRe|fNum);..|
|00004000| 09 09 0d 09 09 09 49 6e | 69 74 43 75 72 73 6f 72 |......In|itCursor|
|00004010| 28 29 3b 0d 09 09 09 0d | 09 09 09 72 65 74 75 72 |();.....|...retur|
|00004020| 6e 28 74 72 75 65 29 3b | 0d 09 09 7d 0d 09 09 0d |n(true);|...}....|
|00004030| 09 09 65 6c 73 65 0d 09 | 09 09 72 65 74 75 72 6e |..else..|..return|
|00004040| 28 66 61 6c 73 65 29 3b | 0d 09 7d 0d 09 0d 09 65 |(false);|..}....e|
|00004050| 6c 73 65 0d 09 09 72 65 | 74 75 72 6e 28 66 61 6c |lse...re|turn(fal|
|00004060| 73 65 29 3b 0d 7d 0d 0d | 0d 0d 0d 59 65 73 4e 6f |se);.}..|...YesNo|
|00004070| 43 61 6e 63 65 6c 28 74 | 68 65 50 72 6f 6d 70 74 |Cancel(t|hePrompt|
|00004080| 2c 74 68 65 44 65 66 61 | 75 6c 74 29 0d 63 68 61 |,theDefa|ult).cha|
|00004090| 72 09 2a 74 68 65 50 72 | 6f 6d 70 74 3b 73 68 6f |r.*thePr|ompt;sho|
|000040a0| 72 74 09 74 68 65 44 65 | 66 61 75 6c 74 3b 0d 7b |rt.theDe|fault;.{|
|000040b0| 0d 44 69 61 6c 6f 67 50 | 74 72 09 09 74 68 65 44 |.DialogP|tr..theD|
|000040c0| 50 74 72 2c 74 65 6d 70 | 44 50 74 72 3b 0d 73 68 |Ptr,temp|DPtr;.sh|
|000040d0| 6f 72 74 09 09 09 09 69 | 74 65 6d 48 69 74 2c 20 |ort....i|temHit, |
|000040e0| 74 79 70 65 3b 0d 48 61 | 6e 64 6c 65 09 09 09 74 |type;.Ha|ndle...t|
|000040f0| 68 65 49 74 65 6d 3b 0d | 52 65 63 74 09 09 09 74 |heItem;.|Rect...t|
|00004100| 65 6d 70 52 65 63 74 3b | 0d 47 72 61 66 50 74 72 |empRect;|.GrafPtr|
|00004110| 09 09 09 6f 6c 64 50 6f | 72 74 3b 0d 63 68 61 72 |...oldPo|rt;.char|
|00004120| 09 09 09 74 65 6d 70 53 | 74 72 69 6e 67 5b 32 35 |...tempS|tring[25|
|00004130| 36 5d 3b 0d 45 76 65 6e | 74 52 65 63 6f 72 64 09 |6];.Even|tRecord.|
|00004140| 09 74 68 65 45 76 65 6e | 74 3b 0d 0d 09 47 65 74 |.theEven|t;...Get|
|00004150| 50 6f 72 74 28 26 6f 6c | 64 50 6f 72 74 29 3b 0d |Port(&ol|dPort);.|
|00004160| 09 0d 09 49 6e 69 74 43 | 75 72 73 6f 72 28 29 3b |...InitC|ursor();|
|00004170| 0d 09 0d 09 74 68 65 44 | 50 74 72 20 3d 20 47 65 |....theD|Ptr = Ge|
|00004180| 74 4e 65 77 44 69 61 6c | 6f 67 28 79 65 73 4e 6f |tNewDial|og(yesNo|
|00004190| 43 61 6e 63 65 6c 44 4c | 4f 47 2c 20 30 4c 2c 28 |CancelDL|OG, 0L,(|
|000041a0| 57 69 6e 64 6f 77 50 74 | 72 29 20 2d 31 4c 29 3b |WindowPt|r) -1L);|
|000041b0| 0d 09 0d 09 43 65 6e 74 | 65 72 57 69 6e 64 6f 77 |....Cent|erWindow|
|000041c0| 28 74 68 65 44 50 74 72 | 29 3b 0d 09 53 68 6f 77 |(theDPtr|);..Show|
|000041d0| 57 69 6e 64 6f 77 28 74 | 68 65 44 50 74 72 29 3b |Window(t|heDPtr);|
|000041e0| 0d 09 0d 09 53 65 74 50 | 6f 72 74 28 74 68 65 44 |....SetP|ort(theD|
|000041f0| 50 74 72 29 3b 0d 09 0d | 09 28 28 44 69 61 6c 6f |Ptr);...|.((Dialo|
|00004200| 67 50 65 65 6b 29 20 74 | 68 65 44 50 74 72 29 2d |gPeek) t|heDPtr)-|
|00004210| 3e 61 44 65 66 49 74 65 | 6d 20 3d 20 74 68 65 44 |>aDefIte|m = theD|
|00004220| 65 66 61 75 6c 74 3b 0d | 09 0d 09 69 66 20 28 21 |efault;.|...if (!|
|00004230| 64 65 66 61 75 6c 74 49 | 74 65 6d 55 50 50 29 0d |defaultI|temUPP).|
|00004240| 09 09 64 65 66 61 75 6c | 74 49 74 65 6d 55 50 50 |..defaul|tItemUPP|
|00004250| 20 3d 20 4e 65 77 55 73 | 65 72 49 74 65 6d 50 72 | = NewUs|erItemPr|
|00004260| 6f 63 28 48 69 6c 69 74 | 65 44 65 66 61 75 6c 74 |oc(Hilit|eDefault|
|00004270| 42 75 74 74 6f 6e 29 3b | 0d 09 47 65 74 44 49 74 |Button);|..GetDIt|
|00004280| 65 6d 28 74 68 65 44 50 | 74 72 2c 20 34 2c 20 26 |em(theDP|tr, 4, &|
|00004290| 74 79 70 65 2c 20 26 74 | 68 65 49 74 65 6d 2c 20 |type, &t|heItem, |
|000042a0| 26 74 65 6d 70 52 65 63 | 74 29 3b 0d 09 53 65 74 |&tempRec|t);..Set|
|000042b0| 44 49 74 65 6d 28 74 68 | 65 44 50 74 72 2c 20 34 |DItem(th|eDPtr, 4|
|000042c0| 2c 20 74 79 70 65 2c 20 | 28 48 61 6e 64 6c 65 29 |, type, |(Handle)|
|000042d0| 20 64 65 66 61 75 6c 74 | 49 74 65 6d 55 50 50 2c | default|ItemUPP,|
|000042e0| 20 26 74 65 6d 70 52 65 | 63 74 29 3b 0d 09 0d 09 | &tempRe|ct);....|
|000042f0| 73 74 72 63 70 79 28 74 | 65 6d 70 53 74 72 69 6e |strcpy(t|empStrin|
|00004300| 67 2c 74 68 65 50 72 6f | 6d 70 74 29 3b 0d 09 43 |g,thePro|mpt);..C|
|00004310| 32 50 53 74 72 28 74 65 | 6d 70 53 74 72 69 6e 67 |2PStr(te|mpString|
|00004320| 29 3b 0d 09 47 65 74 44 | 49 74 65 6d 28 74 68 65 |);..GetD|Item(the|
|00004330| 44 50 74 72 2c 20 35 2c | 20 26 74 79 70 65 2c 20 |DPtr, 5,| &type, |
|00004340| 26 74 68 65 49 74 65 6d | 2c 20 26 74 65 6d 70 52 |&theItem|, &tempR|
|00004350| 65 63 74 29 3b 0d 09 53 | 65 74 49 54 65 78 74 28 |ect);..S|etIText(|
|00004360| 74 68 65 49 74 65 6d 2c | 20 28 43 6f 6e 73 74 53 |theItem,| (ConstS|
|00004370| 74 72 32 35 35 50 61 72 | 61 6d 29 20 74 65 6d 70 |tr255Par|am) temp|
|00004380| 53 74 72 69 6e 67 29 3b | 0d 09 0d 09 69 66 20 28 |String);|....if (|
|00004390| 47 65 74 4e 65 78 74 45 | 76 65 6e 74 28 75 70 64 |GetNextE|vent(upd|
|000043a0| 61 74 65 4d 61 73 6b 2c | 26 74 68 65 45 76 65 6e |ateMask,|&theEven|
|000043b0| 74 29 20 26 26 20 74 68 | 65 45 76 65 6e 74 2e 6d |t) && th|eEvent.m|
|000043c0| 65 73 73 61 67 65 20 3d | 3d 20 28 6c 6f 6e 67 29 |essage =|= (long)|
|000043d0| 20 74 68 65 44 50 74 72 | 29 0d 09 09 44 69 61 6c | theDPtr|)...Dial|
|000043e0| 6f 67 53 65 6c 65 63 74 | 28 26 74 68 65 45 76 65 |ogSelect|(&theEve|
|000043f0| 6e 74 2c 26 74 65 6d 70 | 44 50 74 72 2c 26 69 74 |nt,&temp|DPtr,&it|
|00004400| 65 6d 48 69 74 29 3b 0d | 09 0d 09 53 79 73 42 65 |emHit);.|...SysBe|
|00004410| 65 70 28 31 29 3b 0d 09 | 0d 09 64 6f 20 0d 09 7b |ep(1);..|..do ..{|
|00004420| 0d 09 09 4d 6f 64 61 6c | 44 69 61 6c 6f 67 28 30 |...Modal|Dialog(0|
|00004430| 4c 2c 26 69 74 65 6d 48 | 69 74 29 3b 0d 09 09 0d |L,&itemH|it);....|
|00004440| 09 7d 20 77 68 69 6c 65 | 20 28 21 28 69 74 65 6d |.} while| (!(item|
|00004450| 48 69 74 3e 3d 31 20 26 | 26 20 69 74 65 6d 48 69 |Hit>=1 &|& itemHi|
|00004460| 74 3c 3d 33 29 29 3b 0d | 09 0d 09 44 69 73 70 6f |t<=3));.|...Dispo|
|00004470| 73 44 69 61 6c 6f 67 28 | 74 68 65 44 50 74 72 29 |sDialog(|theDPtr)|
|00004480| 3b 0d 09 53 65 74 50 6f | 72 74 28 6f 6c 64 50 6f |;..SetPo|rt(oldPo|
|00004490| 72 74 29 3b 0d 09 0d 09 | 72 65 74 75 72 6e 28 69 |rt);....|return(i|
|000044a0| 74 65 6d 48 69 74 29 3b | 0d 7d 0d 0d 0d 0d 0d 43 |temHit);|.}.....C|
|000044b0| 65 6e 74 65 72 57 69 6e | 64 6f 77 28 77 50 74 72 |enterWin|dow(wPtr|
|000044c0| 29 0d 57 69 6e 64 6f 77 | 50 74 72 09 77 50 74 72 |).Window|Ptr.wPtr|
|000044d0| 3b 0d 7b 0d 73 68 6f 72 | 74 09 09 73 63 72 65 65 |;.{.shor|t..scree|
|000044e0| 6e 57 69 64 74 68 2c 73 | 63 72 65 65 6e 48 65 69 |nWidth,s|creenHei|
|000044f0| 67 68 74 2c 77 69 6e 64 | 6f 77 57 69 64 74 68 2c |ght,wind|owWidth,|
|00004500| 77 69 6e 64 6f 77 48 65 | 69 67 68 74 2c 6c 65 66 |windowHe|ight,lef|
|00004510| 74 2c 74 6f 70 3b 0d 0d | 09 69 66 20 28 77 50 74 |t,top;..|.if (wPt|
|00004520| 72 20 3d 3d 20 30 4c 29 | 0d 09 09 72 65 74 75 72 |r == 0L)|...retur|
|00004530| 6e 3b 0d 09 0d 09 73 63 | 72 65 65 6e 57 69 64 74 |n;....sc|reenWidt|
|00004540| 68 20 3d 20 71 64 2e 73 | 63 72 65 65 6e 42 69 74 |h = qd.s|creenBit|
|00004550| 73 2e 62 6f 75 6e 64 73 | 2e 72 69 67 68 74 20 2d |s.bounds|.right -|
|00004560| 20 71 64 2e 73 63 72 65 | 65 6e 42 69 74 73 2e 62 | qd.scre|enBits.b|
|00004570| 6f 75 6e 64 73 2e 6c 65 | 66 74 3b 0d 09 73 63 72 |ounds.le|ft;..scr|
|00004580| 65 65 6e 48 65 69 67 68 | 74 20 3d 20 71 64 2e 73 |eenHeigh|t = qd.s|
|00004590| 63 72 65 65 6e 42 69 74 | 73 2e 62 6f 75 6e 64 73 |creenBit|s.bounds|
|000045a0| 2e 62 6f 74 74 6f 6d 20 | 2d 20 71 64 2e 73 63 72 |.bottom |- qd.scr|
|000045b0| 65 65 6e 42 69 74 73 2e | 62 6f 75 6e 64 73 2e 74 |eenBits.|bounds.t|
|000045c0| 6f 70 20 2d 20 32 30 3b | 0d 09 77 69 6e 64 6f 77 |op - 20;|..window|
|000045d0| 57 69 64 74 68 20 3d 20 | 77 50 74 72 2d 3e 70 6f |Width = |wPtr->po|
|000045e0| 72 74 52 65 63 74 2e 72 | 69 67 68 74 20 2d 20 77 |rtRect.r|ight - w|
|000045f0| 50 74 72 2d 3e 70 6f 72 | 74 52 65 63 74 2e 6c 65 |Ptr->por|tRect.le|
|00004600| 66 74 3b 0d 09 77 69 6e | 64 6f 77 48 65 69 67 68 |ft;..win|dowHeigh|
|00004610| 74 20 3d 20 77 50 74 72 | 2d 3e 70 6f 72 74 52 65 |t = wPtr|->portRe|
|00004620| 63 74 2e 62 6f 74 74 6f | 6d 20 2d 20 77 50 74 72 |ct.botto|m - wPtr|
|00004630| 2d 3e 70 6f 72 74 52 65 | 63 74 2e 74 6f 70 3b 0d |->portRe|ct.top;.|
|00004640| 09 0d 09 6c 65 66 74 20 | 3d 20 71 64 2e 73 63 72 |...left |= qd.scr|
|00004650| 65 65 6e 42 69 74 73 2e | 62 6f 75 6e 64 73 2e 6c |eenBits.|bounds.l|
|00004660| 65 66 74 20 2b 20 28 73 | 63 72 65 65 6e 57 69 64 |eft + (s|creenWid|
|00004670| 74 68 20 2d 20 77 69 6e | 64 6f 77 57 69 64 74 68 |th - win|dowWidth|
|00004680| 29 2f 32 3b 0d 09 74 6f | 70 20 3d 20 71 64 2e 73 |)/2;..to|p = qd.s|
|00004690| 63 72 65 65 6e 42 69 74 | 73 2e 62 6f 75 6e 64 73 |creenBit|s.bounds|
|000046a0| 2e 74 6f 70 20 2b 20 32 | 30 20 2b 20 28 73 63 72 |.top + 2|0 + (scr|
|000046b0| 65 65 6e 48 65 69 67 68 | 74 20 2d 20 77 69 6e 64 |eenHeigh|t - wind|
|000046c0| 6f 77 48 65 69 67 68 74 | 29 2f 32 3b 0d 09 0d 09 |owHeight|)/2;....|
|000046d0| 69 66 20 28 6c 65 66 74 | 20 3c 20 30 29 0d 09 09 |if (left| < 0)...|
|000046e0| 6c 65 66 74 20 3d 20 30 | 3b 0d 09 0d 09 69 66 20 |left = 0|;....if |
|000046f0| 28 74 6f 70 20 3c 20 32 | 30 29 0d 09 09 74 6f 70 |(top < 2|0)...top|
|00004700| 20 3d 20 32 30 3b 0d 09 | 0d 09 4d 6f 76 65 57 69 | = 20;..|..MoveWi|
|00004710| 6e 64 6f 77 28 77 50 74 | 72 2c 6c 65 66 74 2c 74 |ndow(wPt|r,left,t|
|00004720| 6f 70 2c 66 61 6c 73 65 | 29 3b 0d 7d 0d 0d 0d 0d |op,false|);.}....|
|00004730| 0d 49 6e 73 65 72 74 54 | 65 78 74 46 69 6c 65 28 |.InsertT|extFile(|
|00004740| 74 68 65 54 45 48 29 0d | 54 45 33 32 4b 48 61 6e |theTEH).|TE32KHan|
|00004750| 64 6c 65 09 74 68 65 54 | 45 48 3b 0d 7b 0d 53 46 |dle.theT|EH;.{.SF|
|00004760| 52 65 70 6c 79 09 09 6d | 79 53 46 52 65 70 6c 79 |Reply..m|ySFReply|
|00004770| 3b 0d 53 46 54 79 70 65 | 4c 69 73 74 09 6d 79 53 |;.SFType|List.myS|
|00004780| 46 54 79 70 65 73 3b 0d | 50 6f 69 6e 74 09 09 74 |FTypes;.|Point..t|
|00004790| 68 65 54 6f 70 4c 65 66 | 74 3b 0d 73 68 6f 72 74 |heTopLef|t;.short|
|000047a0| 09 09 09 65 72 72 43 6f | 64 65 2c 66 52 65 66 4e |...errCo|de,fRefN|
|000047b0| 75 6d 3b 0d 6c 6f 6e 67 | 09 09 62 79 74 65 43 6f |um;.long|..byteCo|
|000047c0| 75 6e 74 3b 0d 50 74 72 | 09 09 09 74 68 65 54 65 |unt;.Ptr|...theTe|
|000047d0| 78 74 3b 0d 63 68 61 72 | 09 09 74 65 6d 70 53 74 |xt;.char|..tempSt|
|000047e0| 72 69 6e 67 5b 32 35 36 | 5d 3b 0d 0d 09 69 66 20 |ring[256|];...if |
|000047f0| 28 74 68 65 54 45 48 29 | 0d 09 7b 0d 09 09 74 68 |(theTEH)|..{...th|
|00004800| 65 54 6f 70 4c 65 66 74 | 2e 68 20 3d 20 71 64 2e |eTopLeft|.h = qd.|
|00004810| 73 63 72 65 65 6e 42 69 | 74 73 2e 62 6f 75 6e 64 |screenBi|ts.bound|
|00004820| 73 2e 6c 65 66 74 20 2b | 20 28 71 64 2e 73 63 72 |s.left +| (qd.scr|
|00004830| 65 65 6e 42 69 74 73 2e | 62 6f 75 6e 64 73 2e 72 |eenBits.|bounds.r|
|00004840| 69 67 68 74 20 2d 20 71 | 64 2e 73 63 72 65 65 6e |ight - q|d.screen|
|00004850| 42 69 74 73 2e 62 6f 75 | 6e 64 73 2e 6c 65 66 74 |Bits.bou|nds.left|
|00004860| 20 2d 20 33 34 38 29 2f | 32 3b 3b 0d 09 09 74 68 | - 348)/|2;;...th|
|00004870| 65 54 6f 70 4c 65 66 74 | 2e 76 20 3d 20 71 64 2e |eTopLeft|.v = qd.|
|00004880| 73 63 72 65 65 6e 42 69 | 74 73 2e 62 6f 75 6e 64 |screenBi|ts.bound|
|00004890| 73 2e 74 6f 70 20 2b 20 | 35 30 3b 0d 09 09 0d 09 |s.top + |50;.....|
|000048a0| 09 6d 79 53 46 54 79 70 | 65 73 5b 30 5d 20 3d 20 |.mySFTyp|es[0] = |
|000048b0| 27 54 45 58 54 27 3b 0d | 09 09 0d 09 09 49 6e 69 |'TEXT';.|.....Ini|
|000048c0| 74 43 75 72 73 6f 72 28 | 29 3b 0d 09 09 0d 09 09 |tCursor(|);......|
|000048d0| 53 46 47 65 74 46 69 6c | 65 28 74 68 65 54 6f 70 |SFGetFil|e(theTop|
|000048e0| 4c 65 66 74 2c 22 5c 70 | 53 65 6c 65 63 74 20 54 |Left,"\p|Select T|
|000048f0| 65 78 74 20 46 69 6c 65 | 20 54 6f 20 49 6e 73 65 |ext File| To Inse|
|00004900| 72 74 3a 22 2c 30 4c 2c | 31 2c 6d 79 53 46 54 79 |rt:",0L,|1,mySFTy|
|00004910| 70 65 73 2c 30 4c 2c 26 | 6d 79 53 46 52 65 70 6c |pes,0L,&|mySFRepl|
|00004920| 79 29 3b 0d 09 09 0d 09 | 09 69 66 20 28 6d 79 53 |y);.....|.if (myS|
|00004930| 46 52 65 70 6c 79 2e 67 | 6f 6f 64 29 0d 09 09 7b |FReply.g|ood)...{|
|00004940| 0d 09 09 09 69 66 20 28 | 28 65 72 72 43 6f 64 65 |....if (|(errCode|
|00004950| 20 3d 20 46 53 4f 70 65 | 6e 28 6d 79 53 46 52 65 | = FSOpe|n(mySFRe|
|00004960| 70 6c 79 2e 66 4e 61 6d | 65 2c 6d 79 53 46 52 65 |ply.fNam|e,mySFRe|
|00004970| 70 6c 79 2e 76 52 65 66 | 4e 75 6d 2c 26 66 52 65 |ply.vRef|Num,&fRe|
|00004980| 66 4e 75 6d 29 29 21 3d | 6e 6f 45 72 72 29 0d 09 |fNum))!=|noErr)..|
|00004990| 09 09 7b 0d 09 09 09 09 | 50 32 43 53 74 72 28 28 |..{.....|P2CStr((|
|000049a0| 75 6e 73 69 67 6e 65 64 | 20 63 68 61 72 20 2a 29 |unsigned| char *)|
|000049b0| 20 6d 79 53 46 52 65 70 | 6c 79 2e 66 4e 61 6d 65 | mySFRep|ly.fName|
|000049c0| 29 3b 0d 09 09 09 09 73 | 70 72 69 6e 74 66 28 74 |);.....s|printf(t|
|000049d0| 65 6d 70 53 74 72 69 6e | 67 2c 22 49 6e 73 65 72 |empStrin|g,"Inser|
|000049e0| 74 54 65 78 74 46 69 6c | 65 3a 20 46 53 4f 70 65 |tTextFil|e: FSOpe|
|000049f0| 6e 28 27 25 73 27 29 20 | 45 72 72 6f 72 20 25 64 |n('%s') |Error %d|
|00004a00| 22 2c 6d 79 53 46 52 65 | 70 6c 79 2e 66 4e 61 6d |",mySFRe|ply.fNam|
|00004a10| 65 2c 65 72 72 43 6f 64 | 65 29 3b 0d 09 09 09 09 |e,errCod|e);.....|
|00004a20| 45 72 72 6f 72 41 6c 65 | 72 74 28 74 65 6d 70 53 |ErrorAle|rt(tempS|
|00004a30| 74 72 69 6e 67 29 3b 0d | 09 09 09 09 72 65 74 75 |tring);.|....retu|
|00004a40| 72 6e 28 74 72 75 65 29 | 3b 0d 09 09 09 7d 0d 09 |rn(true)|;....}..|
|00004a50| 09 09 0d 09 09 09 69 66 | 20 28 28 65 72 72 43 6f |......if| ((errCo|
|00004a60| 64 65 20 3d 20 47 65 74 | 45 4f 46 28 66 52 65 66 |de = Get|EOF(fRef|
|00004a70| 4e 75 6d 2c 26 62 79 74 | 65 43 6f 75 6e 74 29 29 |Num,&byt|eCount))|
|00004a80| 21 3d 6e 6f 45 72 72 29 | 0d 09 09 09 7b 0d 09 09 |!=noErr)|....{...|
|00004a90| 09 09 46 53 43 6c 6f 73 | 65 28 66 52 65 66 4e 75 |..FSClos|e(fRefNu|
|00004aa0| 6d 29 3b 0d 09 09 09 09 | 50 32 43 53 74 72 28 28 |m);.....|P2CStr((|
|00004ab0| 75 6e 73 69 67 6e 65 64 | 20 63 68 61 72 20 2a 29 |unsigned| char *)|
|00004ac0| 20 6d 79 53 46 52 65 70 | 6c 79 2e 66 4e 61 6d 65 | mySFRep|ly.fName|
|00004ad0| 29 3b 0d 09 09 09 09 73 | 70 72 69 6e 74 66 28 74 |);.....s|printf(t|
|00004ae0| 65 6d 70 53 74 72 69 6e | 67 2c 22 49 6e 73 65 72 |empStrin|g,"Inser|
|00004af0| 74 54 65 78 74 46 69 6c | 65 3a 20 47 65 74 45 4f |tTextFil|e: GetEO|
|00004b00| 46 28 27 25 73 27 2c 30 | 29 20 45 72 72 6f 72 20 |F('%s',0|) Error |
|00004b10| 25 64 22 2c 6d 79 53 46 | 52 65 70 6c 79 2e 66 4e |%d",mySF|Reply.fN|
|00004b20| 61 6d 65 2c 65 72 72 43 | 6f 64 65 29 3b 0d 09 09 |ame,errC|ode);...|
|00004b30| 09 09 45 72 72 6f 72 41 | 6c 65 72 74 28 74 65 6d |..ErrorA|lert(tem|
|00004b40| 70 53 74 72 69 6e 67 29 | 3b 0d 09 09 09 09 72 65 |pString)|;.....re|
|00004b50| 74 75 72 6e 28 74 72 75 | 65 29 3b 0d 09 09 09 7d |turn(tru|e);....}|
|00004b60| 0d 09 09 09 0d 09 09 09 | 69 66 20 28 28 65 72 72 |........|if ((err|
|00004b70| 43 6f 64 65 20 3d 20 53 | 65 74 46 50 6f 73 28 66 |Code = S|etFPos(f|
|00004b80| 52 65 66 4e 75 6d 2c 66 | 73 46 72 6f 6d 53 74 61 |RefNum,f|sFromSta|
|00004b90| 72 74 2c 30 4c 29 29 21 | 3d 6e 6f 45 72 72 29 0d |rt,0L))!|=noErr).|
|00004ba0| 09 09 09 7b 0d 09 09 09 | 09 46 53 43 6c 6f 73 65 |...{....|.FSClose|
|00004bb0| 28 66 52 65 66 4e 75 6d | 29 3b 0d 09 09 09 09 50 |(fRefNum|);.....P|
|00004bc0| 32 43 53 74 72 28 28 75 | 6e 73 69 67 6e 65 64 20 |2CStr((u|nsigned |
|00004bd0| 63 68 61 72 20 2a 29 20 | 6d 79 53 46 52 65 70 6c |char *) |mySFRepl|
|00004be0| 79 2e 66 4e 61 6d 65 29 | 3b 0d 09 09 09 09 73 70 |y.fName)|;.....sp|
|00004bf0| 72 69 6e 74 66 28 74 65 | 6d 70 53 74 72 69 6e 67 |rintf(te|mpString|
|00004c00| 2c 22 49 6e 73 65 72 74 | 54 65 78 74 46 69 6c 65 |,"Insert|TextFile|
|00004c10| 3a 20 53 65 74 46 50 6f | 73 28 27 25 73 27 2c 30 |: SetFPo|s('%s',0|
|00004c20| 29 20 45 72 72 6f 72 20 | 25 64 22 2c 6d 79 53 46 |) Error |%d",mySF|
|00004c30| 52 65 70 6c 79 2e 66 4e | 61 6d 65 2c 65 72 72 43 |Reply.fN|ame,errC|
|00004c40| 6f 64 65 29 3b 0d 09 09 | 09 09 45 72 72 6f 72 41 |ode);...|..ErrorA|
|00004c50| 6c 65 72 74 28 74 65 6d | 70 53 74 72 69 6e 67 29 |lert(tem|pString)|
|00004c60| 3b 0d 09 09 09 09 72 65 | 74 75 72 6e 28 74 72 75 |;.....re|turn(tru|
|00004c70| 65 29 3b 0d 09 09 09 7d | 0d 09 09 09 0d 09 09 09 |e);....}|........|
|00004c80| 74 68 65 54 65 78 74 20 | 3d 20 4e 65 77 50 74 72 |theText |= NewPtr|
|00004c90| 28 62 79 74 65 43 6f 75 | 6e 74 29 3b 0d 09 09 09 |(byteCou|nt);....|
|00004ca0| 0d 09 09 09 69 66 20 28 | 4d 65 6d 45 72 72 6f 72 |....if (|MemError|
|00004cb0| 28 29 29 0d 09 09 09 7b | 0d 09 09 09 09 46 53 43 |())....{|.....FSC|
|00004cc0| 6c 6f 73 65 28 66 52 65 | 66 4e 75 6d 29 3b 0d 09 |lose(fRe|fNum);..|
|00004cd0| 09 09 09 73 70 72 69 6e | 74 66 28 74 65 6d 70 53 |...sprin|tf(tempS|
|00004ce0| 74 72 69 6e 67 2c 22 49 | 6e 73 65 72 74 54 65 78 |tring,"I|nsertTex|
|00004cf0| 74 46 69 6c 65 3a 20 4e | 65 77 50 74 72 28 25 6c |tFile: N|ewPtr(%l|
|00004d00| 64 29 20 45 72 72 6f 72 | 20 25 64 22 2c 62 79 74 |d) Error| %d",byt|
|00004d10| 65 43 6f 75 6e 74 2c 4d | 65 6d 45 72 72 6f 72 28 |eCount,M|emError(|
|00004d20| 29 29 3b 0d 09 09 09 09 | 45 72 72 6f 72 41 6c 65 |));.....|ErrorAle|
|00004d30| 72 74 28 74 65 6d 70 53 | 74 72 69 6e 67 29 3b 0d |rt(tempS|tring);.|
|00004d40| 09 09 09 09 72 65 74 75 | 72 6e 28 74 72 75 65 29 |....retu|rn(true)|
|00004d50| 3b 0d 09 09 09 7d 0d 09 | 09 09 0d 09 09 09 69 66 |;....}..|......if|
|00004d60| 20 28 28 65 72 72 43 6f | 64 65 20 3d 20 46 53 52 | ((errCo|de = FSR|
|00004d70| 65 61 64 28 66 52 65 66 | 4e 75 6d 2c 26 62 79 74 |ead(fRef|Num,&byt|
|00004d80| 65 43 6f 75 6e 74 2c 74 | 68 65 54 65 78 74 29 29 |eCount,t|heText))|
|00004d90| 21 3d 6e 6f 45 72 72 29 | 0d 09 09 09 7b 0d 09 09 |!=noErr)|....{...|
|00004da0| 09 09 44 69 73 70 6f 73 | 65 50 74 72 28 74 68 65 |..Dispos|ePtr(the|
|00004db0| 54 65 78 74 29 3b 0d 09 | 09 09 09 46 53 43 6c 6f |Text);..|...FSClo|
|00004dc0| 73 65 28 66 52 65 66 4e | 75 6d 29 3b 0d 09 09 09 |se(fRefN|um);....|
|00004dd0| 09 50 32 43 53 74 72 28 | 28 75 6e 73 69 67 6e 65 |.P2CStr(|(unsigne|
|00004de0| 64 20 63 68 61 72 20 2a | 29 20 6d 79 53 46 52 65 |d char *|) mySFRe|
|00004df0| 70 6c 79 2e 66 4e 61 6d | 65 29 3b 0d 09 09 09 09 |ply.fNam|e);.....|
|00004e00| 73 70 72 69 6e 74 66 28 | 74 65 6d 70 53 74 72 69 |sprintf(|tempStri|
|00004e10| 6e 67 2c 22 49 6e 73 65 | 72 74 54 65 78 74 46 69 |ng,"Inse|rtTextFi|
|00004e20| 6c 65 3a 20 46 53 52 65 | 61 64 28 27 25 73 27 29 |le: FSRe|ad('%s')|
|00004e30| 20 45 72 72 6f 72 20 25 | 64 22 2c 6d 79 53 46 52 | Error %|d",mySFR|
|00004e40| 65 70 6c 79 2e 66 4e 61 | 6d 65 2c 65 72 72 43 6f |eply.fNa|me,errCo|
|00004e50| 64 65 29 3b 0d 09 09 09 | 09 45 72 72 6f 72 41 6c |de);....|.ErrorAl|
|00004e60| 65 72 74 28 74 65 6d 70 | 53 74 72 69 6e 67 29 3b |ert(temp|String);|
|00004e70| 0d 09 09 09 09 72 65 74 | 75 72 6e 28 74 72 75 65 |.....ret|urn(true|
|00004e80| 29 3b 0d 09 09 09 7d 0d | 09 09 09 0d 09 09 09 69 |);....}.|.......i|
|00004e90| 66 20 28 28 65 72 72 43 | 6f 64 65 20 3d 20 46 53 |f ((errC|ode = FS|
|00004ea0| 43 6c 6f 73 65 28 66 52 | 65 66 4e 75 6d 29 29 21 |Close(fR|efNum))!|
|00004eb0| 3d 6e 6f 45 72 72 29 0d | 09 09 09 7b 0d 09 09 09 |=noErr).|...{....|
|00004ec0| 09 44 69 73 70 6f 73 65 | 50 74 72 28 74 68 65 54 |.Dispose|Ptr(theT|
|00004ed0| 65 78 74 29 3b 0d 09 09 | 09 09 50 32 43 53 74 72 |ext);...|..P2CStr|
|00004ee0| 28 28 75 6e 73 69 67 6e | 65 64 20 63 68 61 72 20 |((unsign|ed char |
|00004ef0| 2a 29 20 6d 79 53 46 52 | 65 70 6c 79 2e 66 4e 61 |*) mySFR|eply.fNa|
|00004f00| 6d 65 29 3b 0d 09 09 09 | 09 73 70 72 69 6e 74 66 |me);....|.sprintf|
|00004f10| 28 74 65 6d 70 53 74 72 | 69 6e 67 2c 22 49 6e 73 |(tempStr|ing,"Ins|
|00004f20| 65 72 74 54 65 78 74 46 | 69 6c 65 3a 20 46 53 43 |ertTextF|ile: FSC|
|00004f30| 6c 6f 73 65 28 27 25 73 | 27 2c 30 29 20 45 72 72 |lose('%s|',0) Err|
|00004f40| 6f 72 20 25 64 22 2c 6d | 79 53 46 52 65 70 6c 79 |or %d",m|ySFReply|
|00004f50| 2e 66 4e 61 6d 65 2c 65 | 72 72 43 6f 64 65 29 3b |.fName,e|rrCode);|
|00004f60| 0d 09 09 09 09 45 72 72 | 6f 72 41 6c 65 72 74 28 |.....Err|orAlert(|
|00004f70| 74 65 6d 70 53 74 72 69 | 6e 67 29 3b 0d 09 09 09 |tempStri|ng);....|
|00004f80| 09 72 65 74 75 72 6e 28 | 74 72 75 65 29 3b 0d 09 |.return(|true);..|
|00004f90| 09 09 7d 0d 09 09 09 0d | 09 09 09 53 65 74 43 75 |..}.....|...SetCu|
|00004fa0| 72 73 6f 72 28 26 77 61 | 69 74 43 75 72 73 6f 72 |rsor(&wa|itCursor|
|00004fb0| 29 3b 0d 09 09 09 0d 09 | 09 09 54 45 33 32 4b 49 |);......|..TE32KI|
|00004fc0| 6e 73 65 72 74 28 74 68 | 65 54 65 78 74 2c 62 79 |nsert(th|eText,by|
|00004fd0| 74 65 43 6f 75 6e 74 2c | 74 68 65 54 45 48 29 3b |teCount,|theTEH);|
|00004fe0| 0d 09 09 09 0d 09 09 09 | 49 6e 69 74 43 75 72 73 |........|InitCurs|
|00004ff0| 6f 72 28 29 3b 0d 09 09 | 09 0d 09 09 09 44 69 73 |or();...|.....Dis|
|00005000| 70 6f 73 65 50 74 72 28 | 74 68 65 54 65 78 74 29 |posePtr(|theText)|
|00005010| 3b 0d 09 09 7d 0d 09 09 | 0d 09 09 72 65 74 75 72 |;...}...|...retur|
|00005020| 6e 28 74 72 75 65 29 3b | 0d 09 7d 0d 09 0d 09 65 |n(true);|..}....e|
|00005030| 6c 73 65 0d 09 09 72 65 | 74 75 72 6e 28 66 61 6c |lse...re|turn(fal|
|00005040| 73 65 29 3b 0d 7d 0d 0d | 0d 0d 0d 44 6f 46 6f 6e |se);.}..|...DoFon|
|00005050| 74 53 69 7a 65 28 74 68 | 65 46 6f 6e 74 4e 61 6d |tSize(th|eFontNam|
|00005060| 65 2c 74 68 65 46 6f 6e | 74 53 69 7a 65 29 0d 63 |e,theFon|tSize).c|
|00005070| 68 61 72 20 2a 74 68 65 | 46 6f 6e 74 4e 61 6d 65 |har *the|FontName|
|00005080| 3b 73 68 6f 72 74 09 74 | 68 65 46 6f 6e 74 53 69 |;short.t|heFontSi|
|00005090| 7a 65 3b 0d 7b 0d 73 68 | 6f 72 74 09 09 09 74 68 |ze;.{.sh|ort...th|
|000050a0| 65 46 6f 6e 74 4e 75 6d | 3b 0d 52 65 63 74 09 09 |eFontNum|;.Rect..|
|000050b0| 74 65 6d 70 52 65 63 74 | 3b 0d 47 72 61 66 50 74 |tempRect|;.GrafPt|
|000050c0| 72 09 09 6f 6c 64 50 6f | 72 74 3b 0d 09 0d 09 69 |r..oldPo|rt;....i|
|000050d0| 66 20 28 74 68 65 54 45 | 48 33 32 4b 29 0d 09 7b |f (theTE|H32K)..{|
|000050e0| 0d 09 09 69 66 20 28 74 | 68 65 46 6f 6e 74 4e 61 |...if (t|heFontNa|
|000050f0| 6d 65 5b 30 5d 29 0d 09 | 09 7b 0d 09 09 09 43 32 |me[0])..|.{....C2|
|00005100| 50 53 74 72 28 74 68 65 | 46 6f 6e 74 4e 61 6d 65 |PStr(the|FontName|
|00005110| 29 3b 0d 09 09 09 47 65 | 74 46 4e 75 6d 28 28 43 |);....Ge|tFNum((C|
|00005120| 6f 6e 73 74 53 74 72 32 | 35 35 50 61 72 61 6d 29 |onstStr2|55Param)|
|00005130| 20 74 68 65 46 6f 6e 74 | 4e 61 6d 65 2c 26 74 68 | theFont|Name,&th|
|00005140| 65 46 6f 6e 74 4e 75 6d | 29 3b 0d 09 09 7d 0d 09 |eFontNum|);...}..|
|00005150| 09 65 6c 73 65 0d 09 09 | 09 74 68 65 46 6f 6e 74 |.else...|.theFont|
|00005160| 4e 75 6d 20 3d 20 2d 31 | 3b 0d 09 09 0d 09 09 0d |Num = -1|;.......|
|00005170| 09 09 69 66 20 28 74 68 | 65 46 6f 6e 74 4e 75 6d |..if (th|eFontNum|
|00005180| 20 3c 20 30 29 0d 09 09 | 09 74 68 65 46 6f 6e 74 | < 0)...|.theFont|
|00005190| 4e 75 6d 20 3d 20 64 65 | 66 61 75 6c 74 46 6f 6e |Num = de|faultFon|
|000051a0| 74 3b 0d 09 09 0d 09 09 | 69 66 20 28 74 68 65 46 |t;......|if (theF|
|000051b0| 6f 6e 74 53 69 7a 65 20 | 3c 3d 20 30 29 0d 09 09 |ontSize |<= 0)...|
|000051c0| 09 74 68 65 46 6f 6e 74 | 53 69 7a 65 20 3d 20 64 |.theFont|Size = d|
|000051d0| 65 66 61 75 6c 74 46 6f | 6e 74 53 69 7a 65 3b 0d |efaultFo|ntSize;.|
|000051e0| 09 09 09 0d 09 09 64 65 | 66 61 75 6c 74 46 6f 6e |......de|faultFon|
|000051f0| 74 20 3d 20 74 68 65 46 | 6f 6e 74 4e 75 6d 3b 0d |t = theF|ontNum;.|
|00005200| 09 09 64 65 66 61 75 6c | 74 46 6f 6e 74 53 69 7a |..defaul|tFontSiz|
|00005210| 65 20 3d 20 74 68 65 46 | 6f 6e 74 53 69 7a 65 3b |e = theF|ontSize;|
|00005220| 0d 09 09 0d 09 09 54 45 | 33 32 4b 53 65 74 46 6f |......TE|32KSetFo|
|00005230| 6e 74 53 74 75 66 66 28 | 74 68 65 46 6f 6e 74 4e |ntStuff(|theFontN|
|00005240| 75 6d 2c 30 2c 73 72 63 | 43 6f 70 79 2c 74 68 65 |um,0,src|Copy,the|
|00005250| 46 6f 6e 74 53 69 7a 65 | 2c 74 68 65 54 45 48 33 |FontSize|,theTEH3|
|00005260| 32 4b 29 3b 0d 09 09 0d | 09 09 41 64 6a 75 73 74 |2K);....|..Adjust|
|00005270| 46 6f 72 52 65 73 69 7a | 65 64 57 69 6e 64 6f 77 |ForResiz|edWindow|
|00005280| 28 29 3b 0d 09 09 0d 09 | 09 47 65 74 50 6f 72 74 |();.....|.GetPort|
|00005290| 28 26 6f 6c 64 50 6f 72 | 74 29 3b 0d 09 09 53 65 |(&oldPor|t);...Se|
|000052a0| 74 50 6f 72 74 28 28 2a | 2a 74 68 65 54 45 48 33 |tPort((*|*theTEH3|
|000052b0| 32 4b 29 2e 69 6e 50 6f | 72 74 29 3b 0d 09 09 74 |2K).inPo|rt);...t|
|000052c0| 65 6d 70 52 65 63 74 20 | 3d 20 28 2a 28 2a 2a 74 |empRect |= (*(**t|
|000052d0| 68 65 54 45 48 33 32 4b | 29 2e 69 6e 50 6f 72 74 |heTEH32K|).inPort|
|000052e0| 29 2e 70 6f 72 74 52 65 | 63 74 3b 0d 09 09 49 6e |).portRe|ct;...In|
|000052f0| 76 61 6c 52 65 63 74 28 | 26 74 65 6d 70 52 65 63 |valRect(|&tempRec|
|00005300| 74 29 3b 0d 09 09 53 65 | 74 50 6f 72 74 28 6f 6c |t);...Se|tPort(ol|
|00005310| 64 50 6f 72 74 29 3b 0d | 09 09 0d 09 09 4d 61 73 |dPort);.|.....Mas|
|00005320| 68 6f 72 74 61 69 6e 46 | 6f 6e 74 4d 65 6e 75 28 |hortainF|ontMenu(|
|00005330| 29 3b 0d 09 7d 0d 7d 0d | 0d 0d 0d 0d 0d 4d 61 73 |);..}.}.|.....Mas|
|00005340| 68 6f 72 74 61 69 6e 46 | 6f 6e 74 4d 65 6e 75 28 |hortainF|ontMenu(|
|00005350| 29 0d 7b 0d 73 68 6f 72 | 74 09 09 69 2c 6e 75 6d |).{.shor|t..i,num|
|00005360| 49 74 65 6d 73 2c 74 65 | 6d 70 53 69 7a 65 3b 0d |Items,te|mpSize;.|
|00005370| 63 68 61 72 09 74 68 65 | 46 6f 6e 74 53 74 72 69 |char.the|FontStri|
|00005380| 6e 67 5b 31 32 38 5d 3b | 0d 63 68 61 72 09 74 65 |ng[128];|.char.te|
|00005390| 6d 70 53 74 72 69 6e 67 | 5b 32 35 36 5d 3b 0d 0d |mpString|[256];..|
|000053a0| 09 6e 75 6d 49 74 65 6d | 73 20 3d 20 43 6f 75 6e |.numItem|s = Coun|
|000053b0| 74 4d 49 74 65 6d 73 28 | 6d 79 4d 65 6e 75 73 5b |tMItems(|myMenus[|
|000053c0| 66 6f 6e 74 4d 65 6e 75 | 5d 29 3b 0d 09 0d 09 47 |fontMenu|]);....G|
|000053d0| 65 74 46 6f 6e 74 4e 61 | 6d 65 28 64 65 66 61 75 |etFontNa|me(defau|
|000053e0| 6c 74 46 6f 6e 74 2c 28 | 75 6e 73 69 67 6e 65 64 |ltFont,(|unsigned|
|000053f0| 20 63 68 61 72 20 2a 29 | 20 74 68 65 46 6f 6e 74 | char *)| theFont|
|00005400| 53 74 72 69 6e 67 29 3b | 0d 09 50 32 43 53 74 72 |String);|..P2CStr|
|00005410| 28 28 75 6e 73 69 67 6e | 65 64 20 63 68 61 72 20 |((unsign|ed char |
|00005420| 2a 29 74 68 65 46 6f 6e | 74 53 74 72 69 6e 67 29 |*)theFon|tString)|
|00005430| 3b 0d 09 0d 09 66 6f 72 | 20 28 69 3d 31 3b 69 3c |;....for| (i=1;i<|
|00005440| 3d 6e 75 6d 49 74 65 6d | 73 2d 37 3b 69 2b 2b 29 |=numItem|s-7;i++)|
|00005450| 0d 09 7b 0d 09 09 47 65 | 74 49 74 65 6d 28 6d 79 |..{...Ge|tItem(my|
|00005460| 4d 65 6e 75 73 5b 66 6f | 6e 74 4d 65 6e 75 5d 2c |Menus[fo|ntMenu],|
|00005470| 69 2c 28 75 6e 73 69 67 | 6e 65 64 20 63 68 61 72 |i,(unsig|ned char|
|00005480| 20 2a 29 74 65 6d 70 53 | 74 72 69 6e 67 29 3b 0d | *)tempS|tring);.|
|00005490| 09 09 50 32 43 53 74 72 | 28 28 75 6e 73 69 67 6e |..P2CStr|((unsign|
|000054a0| 65 64 20 63 68 61 72 20 | 2a 29 74 65 6d 70 53 74 |ed char |*)tempSt|
|000054b0| 72 69 6e 67 29 3b 0d 09 | 09 0d 09 09 69 66 20 28 |ring);..|....if (|
|000054c0| 73 74 72 63 6d 70 28 74 | 65 6d 70 53 74 72 69 6e |strcmp(t|empStrin|
|000054d0| 67 2c 74 68 65 46 6f 6e | 74 53 74 72 69 6e 67 29 |g,theFon|tString)|
|000054e0| 20 3d 3d 20 45 51 53 54 | 52 29 0d 09 09 7b 0d 09 | == EQST|R)...{..|
|000054f0| 09 09 43 68 65 63 6b 49 | 74 65 6d 28 6d 79 4d 65 |..CheckI|tem(myMe|
|00005500| 6e 75 73 5b 66 6f 6e 74 | 4d 65 6e 75 5d 2c 69 2c |nus[font|Menu],i,|
|00005510| 74 72 75 65 29 3b 0d 09 | 09 09 53 65 74 49 74 65 |true);..|..SetIte|
|00005520| 6d 4d 61 72 6b 28 6d 79 | 4d 65 6e 75 73 5b 66 6f |mMark(my|Menus[fo|
|00005530| 6e 74 4d 65 6e 75 5d 2c | 69 2c 63 68 65 63 6b 4d |ntMenu],|i,checkM|
|00005540| 61 72 6b 29 3b 0d 09 09 | 7d 0d 09 09 65 6c 73 65 |ark);...|}...else|
|00005550| 0d 09 09 09 43 68 65 63 | 6b 49 74 65 6d 28 6d 79 |....Chec|kItem(my|
|00005560| 4d 65 6e 75 73 5b 66 6f | 6e 74 4d 65 6e 75 5d 2c |Menus[fo|ntMenu],|
|00005570| 69 2c 66 61 6c 73 65 29 | 3b 0d 09 7d 0d 09 0d 09 |i,false)|;..}....|
|00005580| 0d 09 73 70 72 69 6e 74 | 66 28 74 68 65 46 6f 6e |..sprint|f(theFon|
|00005590| 74 53 74 72 69 6e 67 2c | 22 25 64 22 2c 64 65 66 |tString,|"%d",def|
|000055a0| 61 75 6c 74 46 6f 6e 74 | 53 69 7a 65 29 3b 0d 09 |aultFont|Size);..|
|000055b0| 0d 09 66 6f 72 20 28 69 | 3d 6e 75 6d 49 74 65 6d |..for (i|=numItem|
|000055c0| 73 2d 36 3b 69 3c 3d 6e | 75 6d 49 74 65 6d 73 3b |s-6;i<=n|umItems;|
|000055d0| 69 2b 2b 29 0d 09 7b 0d | 09 09 47 65 74 49 74 65 |i++)..{.|..GetIte|
|000055e0| 6d 28 6d 79 4d 65 6e 75 | 73 5b 66 6f 6e 74 4d 65 |m(myMenu|s[fontMe|
|000055f0| 6e 75 5d 2c 69 2c 28 75 | 6e 73 69 67 6e 65 64 20 |nu],i,(u|nsigned |
|00005600| 63 68 61 72 20 2a 29 74 | 65 6d 70 53 74 72 69 6e |char *)t|empStrin|
|00005610| 67 29 3b 0d 09 09 50 32 | 43 53 74 72 28 28 75 6e |g);...P2|CStr((un|
|00005620| 73 69 67 6e 65 64 20 63 | 68 61 72 20 2a 29 74 65 |signed c|har *)te|
|00005630| 6d 70 53 74 72 69 6e 67 | 29 3b 0d 09 09 0d 09 09 |mpString|);......|
|00005640| 69 66 20 28 73 73 63 61 | 6e 66 28 74 65 6d 70 53 |if (ssca|nf(tempS|
|00005650| 74 72 69 6e 67 2c 22 25 | 64 22 2c 26 74 65 6d 70 |tring,"%|d",&temp|
|00005660| 53 69 7a 65 29 20 21 3d | 20 31 29 0d 09 09 09 74 |Size) !=| 1)....t|
|00005670| 65 6d 70 53 69 7a 65 20 | 3d 20 2d 31 3b 0d 09 09 |empSize |= -1;...|
|00005680| 0d 09 09 69 66 20 28 73 | 74 72 63 6d 70 28 74 65 |...if (s|trcmp(te|
|00005690| 6d 70 53 74 72 69 6e 67 | 2c 74 68 65 46 6f 6e 74 |mpString|,theFont|
|000056a0| 53 74 72 69 6e 67 29 20 | 3d 3d 20 45 51 53 54 52 |String) |== EQSTR|
|000056b0| 29 0d 09 09 7b 0d 09 09 | 09 43 68 65 63 6b 49 74 |)...{...|.CheckIt|
|000056c0| 65 6d 28 6d 79 4d 65 6e | 75 73 5b 66 6f 6e 74 4d |em(myMen|us[fontM|
|000056d0| 65 6e 75 5d 2c 69 2c 74 | 72 75 65 29 3b 0d 09 09 |enu],i,t|rue);...|
|000056e0| 09 53 65 74 49 74 65 6d | 4d 61 72 6b 28 6d 79 4d |.SetItem|Mark(myM|
|000056f0| 65 6e 75 73 5b 66 6f 6e | 74 4d 65 6e 75 5d 2c 69 |enus[fon|tMenu],i|
|00005700| 2c 63 68 65 63 6b 4d 61 | 72 6b 29 3b 0d 09 09 7d |,checkMa|rk);...}|
|00005710| 0d 09 09 65 6c 73 65 0d | 09 09 09 43 68 65 63 6b |...else.|...Check|
|00005720| 49 74 65 6d 28 6d 79 4d | 65 6e 75 73 5b 66 6f 6e |Item(myM|enus[fon|
|00005730| 74 4d 65 6e 75 5d 2c 69 | 2c 66 61 6c 73 65 29 3b |tMenu],i|,false);|
|00005740| 0d 09 09 0d 09 09 69 66 | 20 28 52 65 61 6c 46 6f |......if| (RealFo|
|00005750| 6e 74 28 64 65 66 61 75 | 6c 74 46 6f 6e 74 2c 74 |nt(defau|ltFont,t|
|00005760| 65 6d 70 53 69 7a 65 29 | 29 0d 09 09 09 53 65 74 |empSize)|)....Set|
|00005770| 49 74 65 6d 53 74 79 6c | 65 28 6d 79 4d 65 6e 75 |ItemStyl|e(myMenu|
|00005780| 73 5b 66 6f 6e 74 4d 65 | 6e 75 5d 2c 69 2c 6f 75 |s[fontMe|nu],i,ou|
|00005790| 74 6c 69 6e 65 29 3b 0d | 09 09 65 6c 73 65 0d 09 |tline);.|..else..|
|000057a0| 09 09 53 65 74 49 74 65 | 6d 53 74 79 6c 65 28 6d |..SetIte|mStyle(m|
|000057b0| 79 4d 65 6e 75 73 5b 66 | 6f 6e 74 4d 65 6e 75 5d |yMenus[f|ontMenu]|
|000057c0| 2c 69 2c 30 29 3b 0d 09 | 7d 0d 7d 0d 0d 0d 0d 0d |,i,0);..|}.}.....|
|000057d0| 43 72 65 61 74 65 42 69 | 67 46 69 6c 65 28 29 0d |CreateBi|gFile().|
|000057e0| 7b 0d 73 68 6f 72 74 09 | 09 09 65 72 72 43 6f 64 |{.short.|..errCod|
|000057f0| 65 2c 66 52 65 66 4e 75 | 6d 3b 0d 6c 6f 6e 67 09 |e,fRefNu|m;.long.|
|00005800| 09 62 79 74 65 43 6f 75 | 6e 74 2c 69 3b 0d 63 68 |.byteCou|nt,i;.ch|
|00005810| 61 72 09 09 74 65 6d 70 | 53 74 72 69 6e 67 5b 32 |ar..temp|String[2|
|00005820| 35 36 5d 3b 0d 53 46 52 | 65 70 6c 79 09 09 6d 79 |56];.SFR|eply..my|
|00005830| 53 46 52 65 70 6c 79 3b | 0d 50 6f 69 6e 74 09 74 |SFReply;|.Point.t|
|00005840| 68 65 54 6f 70 4c 65 66 | 74 3b 0d 0d 09 74 68 65 |heTopLef|t;...the|
|00005850| 54 6f 70 4c 65 66 74 2e | 68 20 3d 20 71 64 2e 73 |TopLeft.|h = qd.s|
|00005860| 63 72 65 65 6e 42 69 74 | 73 2e 62 6f 75 6e 64 73 |creenBit|s.bounds|
|00005870| 2e 6c 65 66 74 20 2b 20 | 28 71 64 2e 73 63 72 65 |.left + |(qd.scre|
|00005880| 65 6e 42 69 74 73 2e 62 | 6f 75 6e 64 73 2e 72 69 |enBits.b|ounds.ri|
|00005890| 67 68 74 20 2d 20 71 64 | 2e 73 63 72 65 65 6e 42 |ght - qd|.screenB|
|000058a0| 69 74 73 2e 62 6f 75 6e | 64 73 2e 6c 65 66 74 20 |its.boun|ds.left |
|000058b0| 2d 20 33 30 34 29 2f 32 | 3b 3b 0d 09 74 68 65 54 |- 304)/2|;;..theT|
|000058c0| 6f 70 4c 65 66 74 2e 76 | 20 3d 20 71 64 2e 73 63 |opLeft.v| = qd.sc|
|000058d0| 72 65 65 6e 42 69 74 73 | 2e 62 6f 75 6e 64 73 2e |reenBits|.bounds.|
|000058e0| 74 6f 70 20 2b 20 35 30 | 3b 0d 09 0d 09 49 6e 69 |top + 50|;....Ini|
|000058f0| 74 43 75 72 73 6f 72 28 | 29 3b 0d 09 0d 09 73 74 |tCursor(|);....st|
|00005900| 72 63 70 79 28 28 63 68 | 61 72 20 2a 29 20 6d 79 |rcpy((ch|ar *) my|
|00005910| 53 46 52 65 70 6c 79 2e | 66 4e 61 6d 65 2c 22 42 |SFReply.|fName,"B|
|00005920| 69 67 20 54 65 78 74 20 | 46 69 6c 65 22 29 3b 0d |ig Text |File");.|
|00005930| 09 43 32 50 53 74 72 28 | 28 63 68 61 72 20 2a 29 |.C2PStr(|(char *)|
|00005940| 20 6d 79 53 46 52 65 70 | 6c 79 2e 66 4e 61 6d 65 | mySFRep|ly.fName|
|00005950| 29 3b 0d 09 0d 09 53 46 | 50 75 74 46 69 6c 65 28 |);....SF|PutFile(|
|00005960| 74 68 65 54 6f 70 4c 65 | 66 74 2c 22 5c 70 53 61 |theTopLe|ft,"\pSa|
|00005970| 76 65 20 31 30 2c 30 30 | 30 20 6c 69 6e 65 20 66 |ve 10,00|0 line f|
|00005980| 69 6c 65 20 61 73 3a 22 | 2c 6d 79 53 46 52 65 70 |ile as:"|,mySFRep|
|00005990| 6c 79 2e 66 4e 61 6d 65 | 2c 30 4c 2c 26 6d 79 53 |ly.fName|,0L,&myS|
|000059a0| 46 52 65 70 6c 79 29 3b | 0d 09 0d 09 69 66 20 28 |FReply);|....if (|
|000059b0| 21 28 6d 79 53 46 52 65 | 70 6c 79 2e 67 6f 6f 64 |!(mySFRe|ply.good|
|000059c0| 29 29 0d 09 09 72 65 74 | 75 72 6e 3b 0d 09 0d 09 |))...ret|urn;....|
|000059d0| 69 66 20 28 28 65 72 72 | 43 6f 64 65 20 3d 20 46 |if ((err|Code = F|
|000059e0| 53 4f 70 65 6e 28 6d 79 | 53 46 52 65 70 6c 79 2e |SOpen(my|SFReply.|
|000059f0| 66 4e 61 6d 65 2c 6d 79 | 53 46 52 65 70 6c 79 2e |fName,my|SFReply.|
|00005a00| 76 52 65 66 4e 75 6d 2c | 26 66 52 65 66 4e 75 6d |vRefNum,|&fRefNum|
|00005a10| 29 29 21 3d 6e 6f 45 72 | 72 29 0d 09 7b 0d 09 09 |))!=noEr|r)..{...|
|00005a20| 69 66 20 28 65 72 72 43 | 6f 64 65 3d 3d 66 6e 66 |if (errC|ode==fnf|
|00005a30| 45 72 72 29 0d 09 09 7b | 0d 09 09 09 69 66 20 28 |Err)...{|....if (|
|00005a40| 28 65 72 72 43 6f 64 65 | 20 3d 20 43 72 65 61 74 |(errCode| = Creat|
|00005a50| 65 28 6d 79 53 46 52 65 | 70 6c 79 2e 66 4e 61 6d |e(mySFRe|ply.fNam|
|00005a60| 65 2c 6d 79 53 46 52 65 | 70 6c 79 2e 76 52 65 66 |e,mySFRe|ply.vRef|
|00005a70| 4e 75 6d 2c 27 20 20 20 | 20 27 2c 0d 09 09 09 09 |Num,'   | ',.....|
|00005a80| 09 09 09 09 09 27 54 45 | 58 54 27 29 29 20 21 3d |.....'TE|XT')) !=|
|00005a90| 20 6e 6f 45 72 72 29 0d | 09 09 09 7b 0d 09 09 09 | noErr).|...{....|
|00005aa0| 09 50 32 43 53 74 72 28 | 28 75 6e 73 69 67 6e 65 |.P2CStr(|(unsigne|
|00005ab0| 64 20 63 68 61 72 20 2a | 29 20 6d 79 53 46 52 65 |d char *|) mySFRe|
|00005ac0| 70 6c 79 2e 66 4e 61 6d | 65 29 3b 0d 09 09 09 09 |ply.fNam|e);.....|
|00005ad0| 73 70 72 69 6e 74 66 28 | 74 65 6d 70 53 74 72 69 |sprintf(|tempStri|
|00005ae0| 6e 67 2c 22 63 72 65 61 | 74 65 42 69 67 46 69 6c |ng,"crea|teBigFil|
|00005af0| 65 3a 20 43 72 65 61 74 | 65 28 27 25 73 27 29 20 |e: Creat|e('%s') |
|00005b00| 45 72 72 6f 72 20 25 64 | 22 2c 28 63 68 61 72 20 |Error %d|",(char |
|00005b10| 2a 29 20 6d 79 53 46 52 | 65 70 6c 79 2e 66 4e 61 |*) mySFR|eply.fNa|
|00005b20| 6d 65 2c 65 72 72 43 6f | 64 65 29 3b 0d 09 09 09 |me,errCo|de);....|
|00005b30| 09 45 72 72 6f 72 41 6c | 65 72 74 28 74 65 6d 70 |.ErrorAl|ert(temp|
|00005b40| 53 74 72 69 6e 67 29 3b | 0d 09 09 09 09 72 65 74 |String);|.....ret|
|00005b50| 75 72 6e 28 66 61 6c 73 | 65 29 3b 0d 09 09 09 7d |urn(fals|e);....}|
|00005b60| 0d 09 09 09 0d 09 09 09 | 65 72 72 43 6f 64 65 20 |........|errCode |
|00005b70| 3d 20 46 53 4f 70 65 6e | 28 6d 79 53 46 52 65 70 |= FSOpen|(mySFRep|
|00005b80| 6c 79 2e 66 4e 61 6d 65 | 2c 6d 79 53 46 52 65 70 |ly.fName|,mySFRep|
|00005b90| 6c 79 2e 76 52 65 66 4e | 75 6d 2c 26 66 52 65 66 |ly.vRefN|um,&fRef|
|00005ba0| 4e 75 6d 29 3b 0d 09 09 | 7d 0d 09 09 0d 09 09 69 |Num);...|}......i|
|00005bb0| 66 20 28 65 72 72 43 6f | 64 65 20 21 3d 20 6e 6f |f (errCo|de != no|
|00005bc0| 45 72 72 29 0d 09 09 7b | 0d 09 09 09 50 32 43 53 |Err)...{|....P2CS|
|00005bd0| 74 72 28 28 75 6e 73 69 | 67 6e 65 64 20 63 68 61 |tr((unsi|gned cha|
|00005be0| 72 20 2a 29 20 6d 79 53 | 46 52 65 70 6c 79 2e 66 |r *) myS|FReply.f|
|00005bf0| 4e 61 6d 65 29 3b 0d 09 | 09 09 73 70 72 69 6e 74 |Name);..|..sprint|
|00005c00| 66 28 74 65 6d 70 53 74 | 72 69 6e 67 2c 22 63 72 |f(tempSt|ring,"cr|
|00005c10| 65 61 74 65 42 69 67 46 | 69 6c 65 3a 20 46 53 4f |eateBigF|ile: FSO|
|00005c20| 70 65 6e 28 27 25 73 27 | 29 20 45 72 72 6f 72 20 |pen('%s'|) Error |
|00005c30| 25 64 22 2c 28 63 68 61 | 72 20 2a 29 20 6d 79 53 |%d",(cha|r *) myS|
|00005c40| 46 52 65 70 6c 79 2e 66 | 4e 61 6d 65 2c 65 72 72 |FReply.f|Name,err|
|00005c50| 43 6f 64 65 29 3b 0d 09 | 09 09 45 72 72 6f 72 41 |Code);..|..ErrorA|
|00005c60| 6c 65 72 74 28 74 65 6d | 70 53 74 72 69 6e 67 29 |lert(tem|pString)|
|00005c70| 3b 0d 09 09 09 72 65 74 | 75 72 6e 28 66 61 6c 73 |;....ret|urn(fals|
|00005c80| 65 29 3b 0d 09 09 7d 0d | 09 7d 0d 09 09 09 0d 09 |e);...}.|.}......|
|00005c90| 69 66 20 28 28 65 72 72 | 43 6f 64 65 20 3d 20 53 |if ((err|Code = S|
|00005ca0| 65 74 45 4f 46 28 66 52 | 65 66 4e 75 6d 2c 30 4c |etEOF(fR|efNum,0L|
|00005cb0| 29 29 21 3d 6e 6f 45 72 | 72 29 0d 09 7b 0d 09 09 |))!=noEr|r)..{...|
|00005cc0| 46 53 43 6c 6f 73 65 28 | 66 52 65 66 4e 75 6d 29 |FSClose(|fRefNum)|
|00005cd0| 3b 0d 09 09 50 32 43 53 | 74 72 28 28 75 6e 73 69 |;...P2CS|tr((unsi|
|00005ce0| 67 6e 65 64 20 63 68 61 | 72 20 2a 29 20 6d 79 53 |gned cha|r *) myS|
|00005cf0| 46 52 65 70 6c 79 2e 66 | 4e 61 6d 65 29 3b 0d 09 |FReply.f|Name);..|
|00005d00| 09 73 70 72 69 6e 74 66 | 28 74 65 6d 70 53 74 72 |.sprintf|(tempStr|
|00005d10| 69 6e 67 2c 22 63 72 65 | 61 74 65 42 69 67 46 69 |ing,"cre|ateBigFi|
|00005d20| 6c 65 3a 20 53 65 74 45 | 4f 46 28 27 25 73 27 2c |le: SetE|OF('%s',|
|00005d30| 30 4c 29 20 45 72 72 6f | 72 20 25 64 22 2c 28 63 |0L) Erro|r %d",(c|
|00005d40| 68 61 72 20 2a 29 20 6d | 79 53 46 52 65 70 6c 79 |har *) m|ySFReply|
|00005d50| 2e 66 4e 61 6d 65 2c 65 | 72 72 43 6f 64 65 29 3b |.fName,e|rrCode);|
|00005d60| 0d 09 09 45 72 72 6f 72 | 41 6c 65 72 74 28 74 65 |...Error|Alert(te|
|00005d70| 6d 70 53 74 72 69 6e 67 | 29 3b 0d 09 09 72 65 74 |mpString|);...ret|
|00005d80| 75 72 6e 28 66 61 6c 73 | 65 29 3b 0d 09 7d 0d 09 |urn(fals|e);..}..|
|00005d90| 0d 09 69 66 20 28 28 65 | 72 72 43 6f 64 65 20 3d |..if ((e|rrCode =|
|00005da0| 20 53 65 74 46 50 6f 73 | 28 66 52 65 66 4e 75 6d | SetFPos|(fRefNum|
|00005db0| 2c 66 73 46 72 6f 6d 53 | 74 61 72 74 2c 30 4c 29 |,fsFromS|tart,0L)|
|00005dc0| 29 21 3d 6e 6f 45 72 72 | 29 0d 09 7b 0d 09 09 46 |)!=noErr|)..{...F|
|00005dd0| 53 43 6c 6f 73 65 28 66 | 52 65 66 4e 75 6d 29 3b |SClose(f|RefNum);|
|00005de0| 0d 09 09 50 32 43 53 74 | 72 28 28 75 6e 73 69 67 |...P2CSt|r((unsig|
|00005df0| 6e 65 64 20 63 68 61 72 | 20 2a 29 20 6d 79 53 46 |ned char| *) mySF|
|00005e00| 52 65 70 6c 79 2e 66 4e | 61 6d 65 29 3b 0d 09 09 |Reply.fN|ame);...|
|00005e10| 73 70 72 69 6e 74 66 28 | 74 65 6d 70 53 74 72 69 |sprintf(|tempStri|
|00005e20| 6e 67 2c 22 63 72 65 61 | 74 65 42 69 67 46 69 6c |ng,"crea|teBigFil|
|00005e30| 65 3a 20 53 65 74 46 50 | 6f 73 28 27 25 73 27 2c |e: SetFP|os('%s',|
|00005e40| 30 29 20 45 72 72 6f 72 | 20 25 64 22 2c 28 63 68 |0) Error| %d",(ch|
|00005e50| 61 72 20 2a 29 20 6d 79 | 53 46 52 65 70 6c 79 2e |ar *) my|SFReply.|
|00005e60| 66 4e 61 6d 65 2c 65 72 | 72 43 6f 64 65 29 3b 0d |fName,er|rCode);.|
|00005e70| 09 09 45 72 72 6f 72 41 | 6c 65 72 74 28 74 65 6d |..ErrorA|lert(tem|
|00005e80| 70 53 74 72 69 6e 67 29 | 3b 0d 09 09 72 65 74 75 |pString)|;...retu|
|00005e90| 72 6e 28 66 61 6c 73 65 | 29 3b 0d 09 7d 0d 09 0d |rn(false|);..}...|
|00005ea0| 09 53 65 74 43 75 72 73 | 6f 72 28 26 77 61 69 74 |.SetCurs|or(&wait|
|00005eb0| 43 75 72 73 6f 72 29 3b | 0d 09 0d 09 66 6f 72 20 |Cursor);|....for |
|00005ec0| 28 69 3d 30 3b 69 3c 31 | 30 30 30 30 3b 69 2b 2b |(i=0;i<1|0000;i++|
|00005ed0| 29 0d 09 7b 0d 09 09 73 | 70 72 69 6e 74 66 28 74 |)..{...s|printf(t|
|00005ee0| 65 6d 70 53 74 72 69 6e | 67 2c 22 6c 69 6e 65 20 |empStrin|g,"line |
|00005ef0| 25 6c 64 5c 72 22 2c 69 | 29 3b 0d 09 09 62 79 74 |%ld\r",i|);...byt|
|00005f00| 65 43 6f 75 6e 74 20 3d | 20 73 74 72 6c 65 6e 28 |eCount =| strlen(|
|00005f10| 74 65 6d 70 53 74 72 69 | 6e 67 29 3b 0d 09 09 0d |tempStri|ng);....|
|00005f20| 09 09 69 66 20 28 28 65 | 72 72 43 6f 64 65 20 3d |..if ((e|rrCode =|
|00005f30| 20 46 53 57 72 69 74 65 | 28 66 52 65 66 4e 75 6d | FSWrite|(fRefNum|
|00005f40| 2c 26 62 79 74 65 43 6f | 75 6e 74 2c 74 65 6d 70 |,&byteCo|unt,temp|
|00005f50| 53 74 72 69 6e 67 29 29 | 21 3d 6e 6f 45 72 72 29 |String))|!=noErr)|
|00005f60| 0d 09 09 7b 0d 09 09 09 | 49 6e 69 74 43 75 72 73 |...{....|InitCurs|
|00005f70| 6f 72 28 29 3b 0d 09 09 | 09 46 53 43 6c 6f 73 65 |or();...|.FSClose|
|00005f80| 28 66 52 65 66 4e 75 6d | 29 3b 0d 09 09 09 50 32 |(fRefNum|);....P2|
|00005f90| 43 53 74 72 28 28 75 6e | 73 69 67 6e 65 64 20 63 |CStr((un|signed c|
|00005fa0| 68 61 72 20 2a 29 20 6d | 79 53 46 52 65 70 6c 79 |har *) m|ySFReply|
|00005fb0| 2e 66 4e 61 6d 65 29 3b | 0d 09 09 09 73 70 72 69 |.fName);|....spri|
|00005fc0| 6e 74 66 28 74 65 6d 70 | 53 74 72 69 6e 67 2c 22 |ntf(temp|String,"|
|00005fd0| 63 72 65 61 74 65 42 69 | 67 46 69 6c 65 3a 20 46 |createBi|gFile: F|
|00005fe0| 53 57 72 69 74 65 28 27 | 25 73 27 29 20 45 72 72 |SWrite('|%s') Err|
|00005ff0| 6f 72 20 25 64 22 2c 28 | 63 68 61 72 20 2a 29 20 |or %d",(|char *) |
|00006000| 6d 79 53 46 52 65 70 6c | 79 2e 66 4e 61 6d 65 2c |mySFRepl|y.fName,|
|00006010| 65 72 72 43 6f 64 65 29 | 3b 0d 09 09 09 45 72 72 |errCode)|;....Err|
|00006020| 6f 72 41 6c 65 72 74 28 | 74 65 6d 70 53 74 72 69 |orAlert(|tempStri|
|00006030| 6e 67 29 3b 0d 09 09 09 | 72 65 74 75 72 6e 28 66 |ng);....|return(f|
|00006040| 61 6c 73 65 29 3b 0d 09 | 09 7d 0d 09 7d 0d 09 09 |alse);..|.}..}...|
|00006050| 0d 09 69 66 20 28 28 65 | 72 72 43 6f 64 65 20 3d |..if ((e|rrCode =|
|00006060| 20 46 53 43 6c 6f 73 65 | 28 66 52 65 66 4e 75 6d | FSClose|(fRefNum|
|00006070| 29 29 21 3d 6e 6f 45 72 | 72 29 0d 09 7b 0d 09 09 |))!=noEr|r)..{...|
|00006080| 49 6e 69 74 43 75 72 73 | 6f 72 28 29 3b 0d 09 09 |InitCurs|or();...|
|00006090| 50 32 43 53 74 72 28 28 | 75 6e 73 69 67 6e 65 64 |P2CStr((|unsigned|
|000060a0| 20 63 68 61 72 20 2a 29 | 20 6d 79 53 46 52 65 70 | char *)| mySFRep|
|000060b0| 6c 79 2e 66 4e 61 6d 65 | 29 3b 0d 09 09 73 70 72 |ly.fName|);...spr|
|000060c0| 69 6e 74 66 28 74 65 6d | 70 53 74 72 69 6e 67 2c |intf(tem|pString,|
|000060d0| 22 63 72 65 61 74 65 42 | 69 67 46 69 6c 65 3a 20 |"createB|igFile: |
|000060e0| 46 53 43 6c 6f 73 65 28 | 27 25 73 27 29 20 45 72 |FSClose(|'%s') Er|
|000060f0| 72 6f 72 20 25 64 22 2c | 28 63 68 61 72 20 2a 29 |ror %d",|(char *)|
|00006100| 20 6d 79 53 46 52 65 70 | 6c 79 2e 66 4e 61 6d 65 | mySFRep|ly.fName|
|00006110| 2c 65 72 72 43 6f 64 65 | 29 3b 0d 09 09 45 72 72 |,errCode|);...Err|
|00006120| 6f 72 41 6c 65 72 74 28 | 74 65 6d 70 53 74 72 69 |orAlert(|tempStri|
|00006130| 6e 67 29 3b 0d 09 09 72 | 65 74 75 72 6e 28 66 61 |ng);...r|eturn(fa|
|00006140| 6c 73 65 29 3b 0d 09 7d | 0d 09 0d 09 46 6c 75 73 |lse);..}|....Flus|
|00006150| 68 56 6f 6c 28 22 5c 70 | 22 2c 6d 79 53 46 52 65 |hVol("\p|",mySFRe|
|00006160| 70 6c 79 2e 76 52 65 66 | 4e 75 6d 29 3b 0d 09 0d |ply.vRef|Num);...|
|00006170| 09 49 6e 69 74 43 75 72 | 73 6f 72 28 29 3b 0d 09 |.InitCur|sor();..|
|00006180| 0d 09 72 65 74 75 72 6e | 28 74 72 75 65 29 3b 0d |..return|(true);.|
|00006190| 7d 0d 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |}.......|........|
|000061a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000061b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000061c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000061d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000061e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000061f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006200| 00 00 01 00 00 00 02 9e | 00 00 01 9e 00 00 00 4a |........|.......J|
|00006210| 28 73 73 63 61 6e 66 28 | 74 65 6d 70 53 74 72 69 |(sscanf(|tempStri|
|00006220| 6e 67 2c 22 25 64 22 2c | 26 74 65 6d 70 53 69 7a |ng,"%d",|&tempSiz|
|00006230| 06 6d 61 69 6e 2e 63 2d | 02 00 00 00 54 45 58 54 |.main.c-|....TEXT|
|00006240| 4b 41 48 4c 01 00 00 00 | 00 00 00 00 00 00 2c 24 |KAHL....|......,$|
|00006250| 00 00 54 45 58 54 4b 41 | 48 4c 01 00 00 00 00 00 |..TEXTKA|HL......|
|00006260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006270| 00 00 a3 72 9e 5c 00 00 | 61 12 00 00 02 e8 0d 09 |...r.\..|a.......|
|00006280| 09 7b 0d 09 09 09 43 68 | 65 63 6b 49 74 65 6d 28 |.{....Ch|eckItem(|
|00006290| 6d 79 4d 65 6e 75 73 5b | 66 6f 6e 74 4d 65 6e 75 |myMenus[|fontMenu|
|000062a0| 5d 2c 69 2c 54 52 55 45 | 29 3b 0d 09 09 09 53 65 |],i,TRUE|);....Se|
|000062b0| 74 49 74 65 6d 4d 61 72 | 6b 28 6d 79 4d 65 6e 75 |tItemMar|k(myMenu|
|000062c0| 73 5b 66 6f 6e 74 4d 65 | 6e 75 5d 2c 69 2c 63 68 |s[fontMe|nu],i,ch|
|000062d0| 65 63 6b 4d 61 72 6b 29 | 3b 0d 09 09 7d 0d 09 09 |eckMark)|;...}...|
|000062e0| 65 6c 73 65 0d 09 09 09 | 43 68 65 63 6b 49 74 65 |else....|CheckIte|
|000062f0| 6d 28 6d 79 4d 65 6e 75 | 73 5b 66 6f 6e 74 4d 65 |m(myMenu|s[fontMe|
|00006300| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 6e 63 6c |...H..Mo|naco.ncl|
|00006310| 00 22 cf 00 22 54 45 33 | 32 4b 2e 68 22 0d 0d 0d |.".."TE3|2K.h"...|
|00006320| 23 64 65 66 69 6e 00 06 | 00 04 00 2b 00 3f 01 df |#defin..|...+.?..|
|00006330| 02 64 00 2b 00 3f 01 df | 02 64 aa 54 53 49 00 00 |.d.+.?..|.d.TSI..|
|00006340| 42 51 00 00 42 5f 00 00 | 40 f3 01 00 00 00 01 2c |BQ..B_..|@......,|
|00006350| 00 0e 00 00 44 2f 00 00 | 44 3b 0d 43 65 6e 74 65 |....D/..|D;.Cente|
|00006360| 72 57 69 6e 64 6f 77 00 | 00 00 1c 1b 00 00 1c 24 |rWindow.|.......$|
|00006370| 09 44 6f 43 6f 6d 6d 61 | 6e 64 00 00 4f cb 00 00 |.DoComma|nd..O...|
|00006380| 4f d5 0b 44 6f 46 6f 6e | 74 53 69 7a 65 00 00 00 |O..DoFon|tSize...|
|00006390| 0b 2c 00 00 0b 36 0b 45 | 72 72 6f 72 41 6c 65 72 |.,...6.E|rrorAler|
|000063a0| 74 00 00 00 09 f0 00 00 | 0a 03 13 48 69 6c 69 74 |t.......|...Hilit|
|000063b0| 65 44 65 66 61 75 6c 74 | 42 75 74 74 6f 6e 00 00 |eDefault|Button..|
|000063c0| 46 b1 00 00 46 bf 0f 49 | 6e 73 65 72 74 54 65 78 |F...F..I|nsertTex|
|000063d0| 74 46 69 6c 65 00 00 00 | 52 bd 00 00 52 cf 11 4d |tFile...|R...R..M|
|000063e0| 61 69 6e 74 61 69 6e 46 | 6f 6e 74 4d 65 6e 75 00 |aintainF|ontMenu.|
|000063f0| 00 00 12 f2 00 00 13 01 | 0d 4d 61 69 6e 74 61 69 |........|.Maintai|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.